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PEN QHANNEL 


Open Channel is where you have the 
opportunity to voice your opinions in Sinclair 
QL World. Whether you want to ask for help 
with a technical problem, provide somebody 


with the answer, or just sound off about 
something which bothers you, write to: Open 
Channel, Sinclair QL World, Greencoat 
House, Francis Street, London SW1 1DG. 


Not in the book Not by the book 


The following facility with 
Easel V2.3 is not mentioned in 
the User Guide. While in data 
entry mode, pressing SHIFT 
F4 brings up the prompt “Enter 
backdrop colour number”. On 
supplying a number, the graph 
is re-drawn with an attractive 
coloured border; all of the 
standard QL stipples are avail- 
able. Text and labels are 


printed on a contrasting strip 

but axis figures are not, so will 

disappear if they are the same 
colour as the backdrop. 

; Hilary Snaden, 

Portishead, 

Bristol. 


I have for a number of years 
felt that handbooks for electro- 
nics equipment are woefully 
inadequate. A few weeks ago I 
advertised for second-hand 
disc drive, together with an 
interface and memory expan- 
sion and was offered just what I 
had requested at a reasonable 
price. 

When I received’the equip- 
ment I found that there was a 
handbook for the Sandy Super- 
Qboard and when I assembled 
the items in accordance with 
the instructions I found that the 
various commands for using 
the drive and for setting up a 


RAMgdise worked. The hand- 
book, however, implied that 
there was a large batch of 
SuperBasic extensions avail- 
able but nothing I tried accessed 
these commands. 

Eventually I decided I had 
been sent a handbook to cover 
just the facilities I had purch- 
ased and that the extensions 
were not present. Later, in 
conversation with a more ex- 
perienced acquaintance, I 
learned that before these ex- 
tensions became functional 
one must ENTER TK2__EXT. 

How stupid of me not to 
have worked this out myself. 

A further examination of the 
handbook revealed the follow- 
ing paragraphs: “TK2__EXT 
enforces the Toolkit II defini- 
tions of common commands 
and functions,” and 
“TK2_EXT enforces the 
Toolkit II definitions of com- 
mon commands and functions. 
If, for any reason, some of the 
Toolkit II extensions have 
been re-defined, TK2.__EXT 
(c.f. FLP_EXT floppy disc 
extensions, EXP__EXT ex- 
pansion unit extensions) will 
reassert the Toolkit II defini- 
tions.” 

This is not exactly calculated 
to jump out as an instruction to 
use this command to enable the 
whole set of extensions. 

At several points in the 
handbook there are sections 
entitled Beginners Start Here. 
If this handbook caters for 
what it regards as beginners, 
how does one learn enough to 
become a mere beginner? 

Experts should acknowledge 
that the bulk of their customers 
expect to use their purchases 


without necessarily under- 
standing them. 

L. Atkins, 

Biggleswade, 

Beds. 

Editor’s comment:  Badly- 

organised, unindexed, un- 


cross-referenced, incomplete, 
poorly-written and jargon- 
ridden manuals have been, and 
remain, one of the plagues of 
computing. This springs partly 
from the same attitude which 
allows poorly-structured and 
incomplete software on to the 
market so that the customer can 
act as an unpaid beta-tester 
prior to updating. 

Early versions are then sold 
as ‘budget’ versions with press- 
ure to upgrade when the soft- 
ware proves inadequate or diffi- 
cult to use and_ telephone- 
intensive help-line, or expensive 
“training courses” offered as a 
substitute for proper documen- 
tation. 

I do not wish to under-play 
the very real difficulties of de- 
veloping a complex piece of 
utility software but although 
computing is still a frontier 
industry, it is time suppliers 
were put under some of the 
same pressure which, for inst- 
ance, car manufacturers face. 
Bad documentation, which can 
render a good piece of software 
a liability to its owner, results 
from thoughtlessness on the 
part of the developers and cost- 
cutting in refusing to hire a 
technical author with sole re- 
sponsibility for the manual. The 
documentation is produced, 
often as an afterthought, by 
technical staff who have little 
grasp of the layman's needs or 
language. Apart from the dis- 
tress to users, doubly to begin- 
ners, this factor can and does 
put, businesses into serious 
financial difficulties. 

Despite the gnashing of teeth, 
QL users have escaped lightly; 
they have access to an inexpen- 
sive machine and comparative- 
ly inexpensive software with 
broad capabilities once they 
become familiar with the 
quirks; a number of suppliers 
provide very good back-up and 
a serious attempt for the most 
part to provide adequate docu- 
mentation. 
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More 
printers 
from HR5 
supplier 


QOL World advertiser EEC Ltd, 
featured as a supplier of the 
HRS printer in the April, 1989 
edition, has contacted us to say 
that it also supplics two inex- 
pensive dot matrix printers, the 
| GP100 and the GP550. 

Any existing user of either of 
those printers who wishes to 
write a “printer report” for OL 
World should write to the 
Editor, EEC Ltd, 18-21 Mis- 
bourne House. Chiltern Hill, 
Chalfont St Peter LS9 SEU. 
Tel: 0753 888866. 


Oxfam 
appeal 


Oxfam is launching an appeal 
for unwanted computer soft- 
ware donations through its 
London branches. The appeal 
is aimed at users and dealers 
and includes hardware, 
although consumer software 
and games are the most popu- 
lar donations. The software 
will be resold through London 
and larger Oxfam shops as part 
of a special promotion to raise 
money for long-term and 
emergency famine relief. 

Richard English at Oxfam 
says It hopes to sell software for: 
some makes of computer ex- 
clusively at specific branches, 
so that users would know 
where to look. 

Donations can be accepted 
at any Oxtam shop branch 
country-wide during June and 
July. The resale promotion 
begins on June 27. 
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Following last month’s news 
that microcassette manu- 
facturer Ablex is faced with a 
tape shortage which may 
thwart its plan to lay down 
stocks of the cartridge prior to 
ceasing manufacture at the end 
of 1989, Sinclair Research has 
responded to QL World con- 
cern that another manufactur- 
er should be able to take over 
production if economics 
allowed. 

Ernie Watkins of Sinclair 
Research to OL World: 

“In the event of Ablex ceas- 
ing manufacture of the car- 
tridge, we would be most 
happy to discuss, with any 


The specialist fractals news- 
letter Fractal Report has now 
reached issue 1, following issue 
()— the free introductory issue 
~ and issue —1 — the flyer. 
Issuc 2 is due on September 1. 

Fractal Report, published by 
Reeves Telecommunications 
Laboratories Ltd of Truro. 
contains articles and programs 
concerning fractals and “simi- 
lar iterations in one or more 
dimensions”, Authors retain 
copyright of their material. 
Issuc 0 has 23 pages on fractals, 
Mandelbrot patterns, com- 
puter graphics and mathe- 
matics, Ad with a yellow cover. 


APOLOGIES 


Inside the June issue of QL World 
an advertisement placed by Digital 
Precision drew a comparison be- 
tween an MS-DOS emulator prog- 
ram by Ant Computing and their 
own emulator program “The Solu- 
tion” and we would like to make it 
clear that OL World and its pub- 
lishers in no way support or en- 
dorse any of the general statements 
made by Digital Precision regard- 
ing other unreviewed emulators 
and that we wish to apologise to 


Fractals grow 


Microcassettes: the 
search for tape 


interested parties, the possi- 
bility of manufacture being 
taken over. We feel, however, 
that even with present supply 
difficulties removed, the prac- 
ticalities, costs and risks associ- 
ated with re-locating and re- 
starting manufacture for a 
diminishing market may prove 
unattractive. 

“In respect of Ablex con- 
sidering, because of reduced 
demand, ceasing production 
during 1989, this would have 
been on a planned basis which 
included laying down reason- 
able stocks of finished product. 
At this point any plans or 
intentions in respect of the 


Fractal Report now has 100 
subscribers. Issue 1, out at the 
end of April, contains articles 
on speeding calculations, ex- 
ploring the Mandelbrot set, 
and others, 

The U.K. subscription costs 
£10 for six issues, backdated to 
the start of the current volume. 
European subscriptions cost 
£12, printed paper rate; else- 
where costs £13 or $23 - 
printed paper airmail rate. 
Enquiries and subscriptions to 
RTL, West Towan House, 
Porthtowan, Cornwall TR4 
8AX. Send an A4 or A5 SAE 
for information. 


Schon PCP if any readers of the 
magazine felt that to be the case. 

Schon PCP are presently intro- 
ducing a new emulator program 
“The Transformer” and they have 
informed us that there is no con- 
nection between the Ant Comput- 
ing program and their new emula- 
tor and that no evidence has been 
produced to support any sugges- 
tion that the latter will not meet its 
specification in full. 

As with any new software prog- 
rams we advise our readers to wait 
for independent reviews. 
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cartridge are frustrated by 
serious problems on the supply 
of suitable tape and Ablex is 
currently awaiting further 
samples from Germany of 
assessment.” 

Ablex production manager 
David MacSorley had ex- 
pressed doubt that another 
manufacturer would resume 
production, apparently on the 
grounds that no other company 
had the tooling capability or 
experience, Ablex has pro- 
duced microcassettes for the 
QL since its development, The 
current situation regarding 
tape supply is as yet 
unresolved. 


Report 
Writer 
published 


Report Writer is a program 
designed to assist the writing of 
reports and critiques. Devel- 
oped by a teacher to help with 
pupil reports, it has been 
adapted to be useful with any 
type of structured report. 

The program is based on two 
files, a Report bank, carrying 
the structural material, and a 
Comment bank, carrying the 
commentary for updating and 
editing. 

Report Writer is available on 
3.5in. disc or Microdrive for 
£14.99 from Cottage Enter- 
prises, 6 Shorwell Close, Gran- 
tham, Lincs NG31 71], and is 
accompanied by a printed 15- 
page instruction booklet. 
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The seu-cawe beneath the Callan. 


Hare, ‘Jou con seer- 
A piace cf dnsttyood, 
A ladder. 
> anater beet, 
Nou beard the boot, 
Ss uneasily en the swell. 
Keay om Will you disembark? 


ow that the Digital 

Precision ACT is be- 

ginning to be 

digested by adven- 
ture writers, a few very profes- 
sional adventures are starting 
to reach the QL scene. Being a 
reasonably-experienced —_ad- 
venturer I am very pleased to 
say that this latest release from 
CGH Services alias QL Adven- 
turers’ Forum is certain to be a 
winner. 

It is written by Dave, Ann 
and Katy Watson who live in 
Scotland and it contains all the 
necessary ingredients to keep 
anyone glued to their sets for 
many hours. 

Being a typical ACT adven- 
ture it has all the good points of 
the original game Imagine de- 
veloped by Steve Sutton using 
the system, i.e., the location 
scenario is shown clearly and as 
you drop or pick up articles they 
appear or disappear from the 
screen, 

The text of the adventure can 
be in mode 4 or 8, for TV or 
monitor by a changing the boot 
listing. By typing-in the word 
‘Info’ you are given several 
useful commands, such as 
“HEALTH, LOOK, SCORE, 
SAVE, RESTORE, GET, 
DROP, RESTART, EXAMI- 
NE, INVENTORY, READ, 
DRINK, THROW, OPEN, 
DIG, QUIT AND ATTACK” 
and they for the most part are 
used in the so-called verb-noun 
category, I.c., ‘Examine Stairs’ 
or ‘Lift Carpet’. 

The direction movement is 
achieved by typing-in the first 
letter of the appropriate com- 
pass bearing, i.e., (N)orth. 

The four-page instruction 
manual is clear and helpful. 
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The sare ure by your side. Dare you 


Full details are given of how to 
make a back-up, the Basic 
commands, general advice to 
new adventurers and a very 
important introduction. It must 
be read thoroughly as clues are 
contained in its text. 

“.. . Reckless, seeking only 
fame, fortune and adventure, 


Le 
supper. The silver shines coldly. 
above the table, A doom Laads 
srawt Holl, 


Here, you cin seem 


OFTWARE FILE 


beneath the following words 
appear, written in a strange 
ancient script: 

“The Bonnie Lassie O" In- 
versnoddie has disappeared. A 
huge reward has been offered 
for her safe recovery; lured by 
this and the tales of her legen- 
dary beauty, you come at last to 
grim MacSporran Castle. . .” 

“|. . Then you find yourself 
outside the Castle with roads 
leading away but is there any 
point in taking them, for all 
routes seem to end inevitably 
back at the grim castle? As you 


Information: 

Program: MacSporran’s 
Lament 

Price: £8 disc or Microdrive 


Supplier: Services. Cwm 
Gwen Hall, Pencader, 
Dyfed, Wales SA39 9HA. 
Tel: 055934 574. 


The vost ond droughty dining room is dominoted by the long toble set for 
Tm the chill mir the choadelien tinkhes 
te the kitchen aad aaether t9 


t hk 


A beskan bell pull in the commer of the room. 


you ride the moorland wilds 
north of the great Glens and 
snow-mantled peaks of the high 
Bens. This is Scotland in the 
year 1745, a wild, savage coun- 
try, its inhabitants no more 
hospitable than the peat bogs of 
rough heather and scree. Clan 
wages war on clan and a lonely 
traveller like yourself is fair 
game to any...” 


Bagpipes 


From the moment you start 
the Adventure your attention is 
grabbed. First you hear the 
sound of bagpipes playing a 
sorrowful lament; then the 
opening scene, drawn in the top 
third of the screen, shows the 
silhouette of a grim castle and 


enter cach new location a fresh 
picture is quickly drawn on 
your screen, adding greatly to 
the atmosphere and enjoyment 

“Wandering through the 
rooms, four upstairs, four 
down, and a Tower, admiring 
the shields and swords on the 
stately walls, all seems very 
quiet; but the silence is decep- 
tive and curious things keep 
taxing the mind. Ghostly hands 
touch you and whisk you to 
underground locations. Secret 
doors open-— only to the correct 
command — and grim warnings 
appear when you linger in cer- 
tain places. 

“Why, when I pull the 
broken Bellpull, do I hear the 
ghostly lament?” 

“What is the significance of 


the portrait of the ‘Laird of 
Auchtermidden’?” 

“Why can I not wear the kilt 
of the dress MacSporran?” 

“Should I play the “Pipes of 
Ewan MacCrummock”™?”, 

I confess that seldom have I 
been so intrigued with such an 
original adventure, perhaps 
also the first in Scottish? As 
each scene is displayed on the 
screen, I find myself marvelling 
at the amount of thought and 
ingenuity the family Watson 
has put into the script. Instead 
of the usual bland “I do not 
understand Lift", when you 
have entered a word not in the 
volcabulary this computer 
replies... . “Lift” is a word I 
dinna ken!” In fact, the whole 
adventure is beautifully lifted 
with Scottish phrases and des- 
criptions, 

Although humour is present 
throughout the scenario, I 
assure you that solving this 
adventure is not child’s play. If 
anything, when I started, I was 
deceived by the apparent sim- 
plicity of the whole plot. Do not 
be fooled as I was, for the 
authors have put much thought 
into creating an intriguing and 
absorbing puzzle. 

] have visited almost all the 
60 or so locations but have not 
solved all the traps and myster- 
ies, for this is a very deep and 
thought-provoking adventure. 
All in all, a first-class piece of 
writing which will give great 
pleasure to all those who enjoy 
“Escaping to far-off Lands” 


John Shaw 
straps on his 
sporran and 
heads for the 
highlands. 


and produced at a very reason- 
able price. 

I have found no bugs or 
errors, so it seems that the 
family Watson has done its 
homework and produced a very 
professional package. It will 
run on 128K or expanded 
machines, 

I have not as yet found the 
“Bonnie Lassie” but make no 
mistake, I shall. 
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Bryan Davies glances 
at some contenders, 
fixes Trump Card 


lock-ups and explains 
overseas subscriptions. 


he Digital Precision MS-DOS 

emulator was delayed somewhat 

by problems with MS-DOS. Ver- 

sion 4.00, which supplier Micro- 
soft has apparently been selling, has 
received several bad reviews in PC 
magazines and looks to be too full of bugs 
to be safe to use. Version 4.01 should be 
out now and this is what DP hopes to ship 
with the “chocolate” version of its 
emulator. 

The £50 difference in price between 
this and the “vanilla” version is due to the 
cost of Microsoft MS-DOS 4.01 which has 
the full MS documentation — good value, 
as it seems unlikely that 4.01 will sell for 
as little as this from the usual PC 
suppliers. 

The vanilla version can be used by 
those who already have a copy of MS- 
DOS; the emulator has been tested with a 
variety of earlier versions, such as 2.10 
and 3.30. For users who wish to swap 
work between QL and PC, the program 
provides the facility to read/write to DOS- 
format discs. 

The upgraded Flashback was targeted 
for release in March-April. The report 
generator module follows. The beta 
test version has some other signifi- 
cant enhancements from the original 
version. text®” version 2.0 has been 
released; this is now a mature program 
which can be used for serious work and 
incorporates features usually found only 
in much more expensive progams — or 
not found at all. 

The modification to Trump Card men- 
tioned previously as a potential cure for 
lock-ups seems to work well. Miracle 
Systems has been making the modifica- 
tion from some time and reports good 
results; | have tried it on two Trumps with 
success. It is simple to do but only for 
those who are good with a small soldering 
iron, as it involves putting resistors piggy- 
back across existing ones. 

Do not try it unless you are proficient 
with the soldering iron, because there are 
several very fine PCB tracks and the legs 
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REORURE 


of an integrated circuit in the vicinity; you 
might join the wrong points and ruin the 
Card. 

At the top right end of the PCB — seen 
from above when in its normal orientation 
to the QL — there is a small IC with a row 
of eight resistors alongside it on the left. 
The resistors are 560ohms each and are 
touching each other; the right ends of the 
resistors are very close to the left-hand 
row of legs of the IC. If in any doubt about 
which resistors are meant, do not attempt 
the modification. 

What has to be done is to solder an 
820ohm resistor across each of the eight 
existing 560ohm resistors. The values of 
the existing resistors are being reduced 
by putting a similar-sized resistor in 
parallel with each one. If you do not feel 
sure about making this modification, con- 
tact Miracle Systems direct. 

It has been pointed out that using the 
Toolkit command RJOB 0,0,0 does not 
“kill” SuperBasic but merely produces the 
message “not complete”, effectively 
ignoring the command. What! had in mind 
when writing about RJOB was the related 
command SPJOB 0,0,0. The latter re- 
duces the priority of SB to 0; with my set- 
up at least, this appears to make SB 
inaccessible, because the input line has 
gone. The only way | know then to get SB 
back is to re-set the machine. 


Buffering 


A reader has asked for details of the 
necessary connections to enable several 
devices to be plugged into the 64-pin 
expansion port. He was hoping to fit 
several similar conectors in parallel with 
the existing one but was advised that 
some form of buffering is required. | could 
not answer the questions properly; 
perhaps other readers would write with 
explanations of what is required? 

Does a multi-way expansion device 
have to be buffered? Another reader says 
that SPEC sells an unbuffered device 
which works well. Do all versions of QL 
suffer from the fault that only one ROM 
device connected to the expansion port is 
recognised, rather than the 16 specified? 

Are all 16 ROM slots taken up when the 
Trump Card is fitted and is it then 
impossible to connect anything other than 
disc drives? The Miracle hard disc unit 
connects to the ROM port and a Trump 
Card will still function as usual in the 64- 
pin slot when the hard disc is connected. 

You may not have noticed that com- 


Ll 


mercial programs are supplied on discs 
which have the write-protect tab in the 
“write enable” position; it is good practice 
to move the tab to the “write protect” 
position as a first action when the disc is 
received, in case subsequent actions 
cause a drive to attempt deletion of files 
on the disc. 


MCS Interface 


Mort Binstock writes from the U.S. to 
offer a solution for those users — e.g., C. 
Roger Fernando — of the MCS interface 
who have problems using programs such 
as Super Media Manager and DiscOVER. 
The problem in this case is the lack of the 
direct sector addressing facility in the 
interface. MCS has a utility routine which 
adds the facility — it can be put into a boot 
program. Whether or not this is freely 
available | do not know but the address to 
contact is given in the information. 

‘A. R. Fuller has had a variety of 
problems using the ANT MS-DOS emula- 
tor version 1.0; if any other readers have 
bought this software we would appreciate 
comment on it. A quotation supplied from 
the brief instructions with the program 
suggests that the author is inviting users 
to obtain “pirate” copies of MS-DOS, 
which is not a practice we can support. 
Given the size of Microsoft, and the fact 
that U.S. software companies are jealous 
about their proprietary rights, it is also 
asking for trouble. It is understood that a 
version 2 of the program is being worked 
on. 

Replies have not been received to 
queries sent to various suppliers in the 
last few months. Among them are ABC 
Elektronic — re Cornez Pierre and 
Schoen — re Henri Hulet. Perhaps these 
suppliers would now like to comment on 
the problems experienced by those 
readers? 


Subscriptions 


R. Gilbert from Nova Scotia asks why 
the charges for software are higher to 
overseas buyers than to U.K. ones and 
quotes figures to suggest they should be 
lower. | do not think the reasons can be 
made fully clear to anyone who has not 
been in the business of sending goods 
overseas. The fact is that sending goods 
overseas is much less simple than send- 
ing them in the U.K. and the administra- 
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tive cost, largely staff time, is much 
greater, While you can put a personal 
airmail letter into a local postbox and it will 
notcost much more than a local first-class 
letter, commercial packages have to be 
taken to a Post Office and forms filled in. lf 
you are VAT-registered it is necessary to 
have all packages listed on a Post Office 
form or you are liable to have difficulty 
with the VAT people, especially. if a 
package is returned, when you can be 
charged for it. 


Despatch 


The reason for some suppliers not 
deducting anything from the price of 
software to allow for no VAT being 
charged is not that they want to pocket the 
VAT but that they are making an effective 
increase in the price of the goods to cover 
some of the extra cost of despatching 


To suggest, as Gilbert does, that post- 
age charges for sending packages over- 
seas are small is wide of the mark in many 
cases. To take the extreme, there is no 
way instruction manuals of the size Digital 
Precision supplies with its software can 
be sent for the normal basic postal 
charge; the cost is likely to be pounds 
rather than pence. 

The reasons for magazines like QL 
World costing so much more overseas 
are rather different. The print trade has 
its own agreements round the world and 
publishers will not supply magazines 
direct to readers at a price lower than that 
charged by their agents in the countries 
concerned. The cover prices of magazi- 
nes are normally much higher in foreign 
currency so, inevitably, the subscription 
costs will be higher, too. 

Because there are fewer people con- 
cerned with the QL in a country other than 
in the U.K., sales will be low whatever 


price is charged for a magazine and, as 
with shipping software, the administrative 
cost will be appreciably higher. 


INFORMATION 
MCS interface: Micro Control 
Systems, Electron House, 
Sandiacre, Nottingham NG10 5BA. 
Tel: 0602 391201. 

Palantair Products software is now 
handled by Rob-Roy Software, 94 
Teignmouth Road, Clevedon, Avon 
BS21 6DR. 

MS-DOS emulator: Digital 
Precision, 222 The Avenue, 
Chingford, London E4 9SE. 

Tel: 01-527 5493. 

Trump Card: Miracle Systems, 20 
Mowbarton, Yate, Bristol BS17 SNF. 
Tel: 0454 317772. 


VERSION 2.00 
STATE OF THE ART IN QL SOFTWARE 


New: German and French versions of all our software with full manuals are 
now available. Advanced text-mode drivers for the new Star printers have 
been added to the range. 


Previous versions of text"? have been rated as more advanced than any PC 
wordprocessor in screen display and printing. The new version 2.00 goes 
even further by providing: 

* Justification on the screen as well as in print. 

* Display of the ruler for the cursor line. Display of the name of the 
typefaces in addition to the WYSIWYG display of typefaces by multiple 
graphic founts, Ten screen founts are now supplied with text®’. 

* Easier selection of typefaces. 

w New 80 page manual. 


Advanced features available in earlier versions have been enhanced 
further. The following are just some of the features. 


* Extremely fast. Much faster than speeded-up Quill, 

* Completely menu driven. No obscure key-press commands to remem- 
ber. 

* Full configuration from within the program. The configured program 
automatically loads the appropriate founts and printer driver when 
executed. 

Trouble-free handling of documents of any size — memory is the only 
limit, 

Fast dynamic block operations. 

Advanced page layout designer allows header, footer and up to 4 
columns of text on the page. 

State of the art handling of daisywheel printers. Supports multiple 
daisywheels with different pitches including proportional spacing. 
Supported printers include Epson, Brother, Silver-Reed, Juki, Qume, 
Quen-Data, Triumph-Adler and many more. 

State of the art handling of 9-pin dot-matrix printers in text mode. 
Different widths of characters, superscript, subscript, bold, italic, 
underline can all be mixed in any part of the text. The twenty different 
printer drivers supplied support more than a hundred different models 
without any modification. Built-in support for accented characters. 
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fountext™* The state-of-the art graphic printer driver for text®’, Now supports 
many non-Epson printers as well as Epsons and compatibles. fountext® is 
supplied with 32 high-quality founts in different styles and sizes up to 72 
pixels high. With fountext** you can use graphic founts without the limiations 
in text editing and document size imposed by other desktop publishing 
programs. Full WYSIWYG. Special 24-pin version at no extra cost. 
founted®’ The graphics editor for fountext™. Allows you to create founts of up 
to 84 x 96 pixels. Captured screen images can be loaded to produce picture 
founts for use within documents. Extensive fount editing operations include 
copy, import, inverse, reflect, shift, etc. 

2488 State-of-the-art text-mode dedicated printer drivers for Epson, NEC 
and Star 24-pin printers and compatibles. With these drivers, text®’ is the 
only QL program that can use the advanced features of 24-pin printers 
currently available at affordable prices. The drivers support multiple 
typefaces, proportional spacing, double-height and double-width modes. 
Epson and Star drivers also support shadow and outline highlights. Drivers 
support up to 1200 different combination of typeface and highlight. 


text” £45 fountext™ £25 
founted®” £15 2488 £15 
Complete edition: text®” + fountext™ + founted®’ £80 
German version: add £4 to the total 
Other software 
Taskmaster £25 
Spellbound £29 
Flashback £40 
Personal callers and credit card orders are welcome by Care Electronics. 
Tel: 0923 672102. 
Prices are inclusive of airmail worldwide. Payable by cheque, Postal Order, 
Eurocheque or credit card. Please specify language, cartridge or disk. 
text®” requires memory expansion (as little as 64K will do}. fountext™ and 
fouted® require at least 128K expansion. 
See the reviews in QL World (April) or Quanta (March), Send for our free 
leaflet if you need more information. 
An independent telephone support service is now available. Contact Mr 
Terry Harman on 0604 842875 for details of the charges. 


Software®’ 


33 SavernakegRoad, 
LondONNW320U arene OX 


Qtyp £29 
Qpac £19 


t?’ 
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Ron Massey picks up a 
mixed postbag. 


eaching into the bot- 

tom of the mailbag, | 

discovered some 

backdated _corres- 
pondence which, much to my 
embarrassment, had been 
neglected. With the possibility 
that other readers may have 
had similar problems — and in 
the hope that the original cor- 
respondents have long since 
had their problems solved — 
we open this edition of Psion 
Solutions. 

A Psion Solutions reader 
has asked if there is any way to 
disable Quill page numbering. 
Within certain limitations — 
mainly a maximum starting 
page number of 254 — Quill 
page numbering is flexible. 

Users are offered the op- 
tions of Arabic (1, 2, 3), Roman 
(I, Il, II!) or alphabet (a, b, c) 
page numbering. Numbering 
may be positioned, with optio- 
nal additional! text, in the head- 
er, footer, or both. If used, 
headers and footers will be 
printed on each page of a 
document and may, for exam- 
ple, consist of: My doc; Page 
nnn of 100. 

Quill offers four options for 
header and footer positioning 
— centre, right, none and left. 
Writing single-page docu- 
ments which includes super- 
fluous page numbering can be 
a nuisance but the Quill num- 
bering can be switched off. 

Defaulting to no header and 
a footer consisting of page 
nnn, switching the footer off 
can be done sequentially by 
pressing <F3>, <F>, <SPA- 
CE> (twice). The footer will be 
set to NONE. Press 
<ENTER> and you will be 
back into your document. 

Another reader asks if there 
is a way to delete forced page 
breaks. To force a page break, 
press <F3> <0> <P> <P>. 
The page break will occur at 
the line immediately below the 
cursor position. 

To delete a page break, 
move the cursor to the first line 
following a page break and 
then up one line. If the cursor 
stops on the line it is a forced 
page break and can be deleted 
by pressing CTRL and the left 
cursor key. 
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A fellow Canon PW1080 
printer enthusiast has written 
with two rather odd problems. 
His Canon is fitted with an 
internal serial interface; he 
does not say whether it was 
supplied by Canon or is of 
third-party manufacture. The 
version of printer software was 
not specified. 

The first problem occurs with 
printing Quill documents. After 
printing about one-third of a 
page of text, the printer prints 
“Overrun error” and scrambles 
the remaining text. 

The second problem, this 
time with Easel, prevents a 
complete dump being made 
without reducing the dump to 
near unintelligibility. He adds 
that the “space invader rub- 
bish” is delayed depending 
whether or not DIP switch 2-3 
is on or off. This DIP switch 
defines whether the 3K input 
buffer is set as an additional 
character buffer or as a PCG. 

The problem described 
could possibly be attributable 
to either or both of two sources. 
The first and most suspect may 
be the interface an may be 
indicating timing or baud rate 
problems. 

| had a similar problem with 
my external serial-to-parallel 
interface some time ago which 
would infrequently and unpre- 
dictably drop characters froma 
line of text. It also had the 
annoying habit of adding char- 
acters spontaniously to a 
graphics dump. Changing the 
interface cured the problem. 


Graphics 


With regard to the second 
possibility, try altering the set- 
tings of SW3-1 and SW3-4 to 
their original factory settings of 
ON and OFF respectively. 
SW3-1 sets the Canon to inter- 
nal fixed Select mode, when 
on. SW3-4 selects either auto- 
matic linefeed, when on, or a 
linefeed on a linefeed signal 
only, when off. If that does not 
work, try setting the two switch- 
es in each of their four possible 
permutations: 

SW3-8W3-4 

OFF OFF 

ON OFF (factory setting) 
OFF ON 


‘VS1O 


Another printer problem; this 
reader wants to convert 
GPRINT__prt so that it will print 
through ser2. Modifying any 
binary file is simple but always 
requires that you know the 
exact position in the file what 
you want to alter is located. My 
GPRINT_prt file is 510 bytes 
long. | mention this only be- 
cause other versions of the 
graphics dump may have been 
supplied by Psion. 

Since the graphics printer 
dumps are not supplied with 
version numbers this may be 
the easiest but not most accu- 
rate way to find if your GPRINT 
is the same as mine. Before 
you start, copy GPRINT__prt 
to the same drive — or a RAM 
disc — under another name. 
COPY mdv1__GPRINT_prt 
to mdv1__GPRINT will work 
for the purpose. 

There are two ways to mod- 
ify machine code files. If you 
have The Editor, load 
GPRINT_prt with the RU 
command. The sole occurence 
of SER1 appears on line two, 
column 81. Change the “1” toa 
“2” and write the file back to a 
drive. | hasten to add you 
should do this with a back-up 
copy only. 

The second method works 
just as well but relies on your 
GPRINT__prt being the same 
as mine. In sequence, type-in 
the following commands in Su- 
perBasic: 


a=RESPR(600); 

LBYTES mdv1__GPRINT__ 
prta 

DELETE 

mdv1__GPRINT__prt 
(Do the latter with a backup 
only). 


This will load the file into 
aspecified area of memory. To 
modify it, type: 


POKE a+273,50 
SBYTES mdvi__GPRINT 
—_prt,a,510 


To see if your modification 
has been successful, type: 
COPY drive_GPRINT_prt 

to scr 

SER should appear on- 
screen in line five, column 


1@@ MODE 4 = CLS 


1d@ 


270 
280 STOP 
290 
300 


seven and should now be 
followed by 2. If the “2” 
appears anywhere else, your 
dump is different from mine 
and the easiest way to obtain 
your file position is to copy the 
GPRINT__prt file to the screen 
(scr) again and count the num- 
ber of characters from the 
beginning of the file to the 
character following SER. 

Once you have obtained the 
character position, modify the 
POKE a+273,50 to POKE a + 
actual_position,50. Try mak- 
ing a dump from ser2 using the 
modified routine. 

A reader has upgraded his 
system to disc drives and RAM 
expansion and wishes to trans- 
fer his programs to his new 
system. There are several 
ways this can be done, includ- 
ing using the mdv emulation 
feature included with most new 
disc systems — i.e., flp__use 
mdv. 

Drive emulation, while use- 
ful for some requirements, de- 
feats the purpose of upgrad- 
ing. The easiest way to make a 
permanent conversion to a 
disc system is to spend a little 
time organising your files. The 
best way is determined only by 


Sinclair/QL World July 1989 


150 PRINT "1. Quill" 
14@ PRINT "2. Archive" 
17@ PRINT "3. Abacus" 
180 PRINT "d. Easel" 
190 REPeat main_lp 


EXEC_W "flpi_" & pro 


DEFine PROCedure Prep 


A simple boot for new disc users. 


11@ REMark IF You have al& 
120 FEMark disk interfact 
13@ FORMAT RAMS_3 


COPY dv$&"printer_datiT 


200 key=CODE(INKEY$) 

21@ SElLect ON key 

220 = d9 f Prepopsi : 
230 = 50 § Prep_psi | 
240 = S51: Prepopsi ¢ 
2@) = 32 : Prep_psi 3 
260 END SELect : END REPes | 


310 © CLOSE#L =: CLOSE#? 
320 © WINDOW#O,400,20, 35, 
330  OPEN#1,"con" : OPEN, 
34@ END DEFine 


M disk 
oolkit: 


on your 


O RAMS printer_dat 


ge="Qui 


g$="Archive" 
g$="Abacus" 


1h" EXIT main_lp 
= EXIT main_Ip 
+ EXIT main_lp 


EXIT main lp 


how you prefer to work but 

here is a starter: 

1. Format a disc. 

2. Type-inthe foregoing listing 
and save it to the disc with 
the filename BOOT. If you 
are using DP Lightning, 
save the above as Boot2 
and use the Lightning boot- 
maker utility to make your 
BOOT. As you add prog- 
rams to your applications 
disc you will probably want 
to add more features to this 
simple program, such as 
setting the date and time for 
date-stamping your files. 

3. Using the normal “copy 
mdv1__filename TO 
flp1_filename” procedure, 
copy the following files from 
cartridge to your newly-for- 
matted disc: 

Quill, Archive, Easel, Aba- 
cus and one copy each of 
Config—bas, Install__dat, 
Printer_dat, Install_bas 
and GPRINT__prt 
Optionally, you can copy 
the following: 

Quill__HOB, Archive_hob, 
Easel_hob and  Aba- 
cus_hob 

Since the __hob files take 
up a fair amount of disc 
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space, copy them only if 
you use them. If the prog- 
ram does not find the file 
when you press <F1> it 
will say so and allow you to 
continue. 

4. After re-setting your QL, run 
Config__bas. 

5. You will be asked for the 
new default locations of 
three files: 

System files (Help) — Enter 
flp1__ 

Printer data — printer_dat 
file: Enter RAM8__ 

Data files — Drive to save 
to: Enter flp2__ 

6. Follow the screen prompts 
and, after each program in 
turn has been configured, 
go back to SuperBasic and 
type “GOTO 1”. This will re- 
start the process and you 
can configure the next 
Psion program. 

A Spanish reader would like 
to know if it is possible to alter 
the prompts of his U.K. version 
of Quill to Spanish. He has 
been advised correctly that 
Quill cannot be used for the 
purpose. The answer is, within 
limits, yes; Quill or any prog- 
ram can easily be modified in 
this way. 

Using Quill as a binary editor 
will not work. For one thing, 
Quill displays only the printable 
characters from the QL font 
set. For another, attempting to 
import Quill into Quill via the 
IMPORT option will load cor- 
rectly only the first seven 
bytes. 

Making alterations to any 
binary file — in this case a 
machine code program — is 
fairly simple. A great deal of 
care must be taken not to alter 
the program and, because you 
have no accurate indication in 
the file which prompts are used 
for which commands, you may 
have to do some of the modifi- 
cation by trial and error. 

A long-winded way of alter- 
ing the prompts, one which 
requires a great deal of time 
and patience, is to write a 
SuperBasic program which will 
POKE new values into a 
memory-resident file. The pro- 
cedure is outlined for 
GPRINT_ort. Since Quill is 
about 57K in length this 


method will require a great 
deal of counting and more than 
a little luck. 

The safest way of altering a 
binary file of any kind is to load 
the file into an editor — not 
Quill. As a rule of thumb you 
can usually modify any text 
strings you can read. There are 
two inflexible rules you can 
violate only at the risk of your 
program — ensure that the 
editor is in over-strike mode as 
opposed to insert mode — this 
will help prevent violating rule 
2. Under no circumstances try 
to increase the length of the 
word you are modifying — 
doing so will usually destroy 
the program. 

Because of rule 2, any Span- 
ish words which are longer 
than their English equivalents 
will have to be abbreviated. 
Conversely, any words which 
are shorter can be followed by 
spaces up to and including the 
last character of the English 
word. For that reason | do not 
recommend making global 
substitutions with an editor’s 
SEARCH/REPLACE function. 

Provided these two rules are 
observed scrupulously, almost 
any machine program can be 
modified in this way. Since | 
normally use Condensed and 
Italics, instead of super- or 
sub-script, | have altered the 
normal Quill prompts. 

Once you have completed 
the alterations, write the prog- 
ram back to a file under 
another name and run it. 
Check through the various 
commands and options to en- 
sure that the displayed 
prompts are what was in- 
tended and to check that the 
program is still entirely functio- 
nal. 

Once satisfied that all is at it 
should be, delete Quill from the 
disc/cartridge — a back-up 
copy, of course — and re- 
name your modified file. 

| have received several let- 
ters, all with the same fatal 
problem — “Error 103 — 
Wrong file type.” Files which 
return this error are perma- 
nently corrupted and no media 
recovery system will be of use 
because the problem is not 
caused by media corruption 


but, instead, by Archive cor- 
rupting the data. 

Because of the way Archive 
manipulates files, unless your 
media is write-protected, Arc- 
hive files are corrupted as soon 
as you OPEN the file and make 
any kind of alteration to it. To 
this | can say only that, as a 
continuing operation proce- 
dure to help prevent this prob- 
lem, you can do two things. 
Never OPEN a file unless you 
intend to alter it. Instead, al- 
ways input the LOOK com- 
mand. Also it is a good idea to 
get into the habit always of 
issuing the CLOSE command, 
even if you are only LOOKing. 
Also, make back-ups frequent- 
ly. If, as can sometimes hap- 
pen, your QL hangs, you will 
have to re-enter the data only 
for the most recent time period. 
The only hope for recovering 
most if not all of the records in 
such a file is to use the PDQL 
Recover. 

Two readers are involved in 
writing massive documents 
and have asked if it is possible 
to overcome the Quill 254- 
page limit. The answer is no. 
The problem is that Quill will 
not accept a starting page 
number greater than 254 but 
will continue to increment from 
that figure if a document starts 
there. 

To test this, | set the start 
page at 254 and typed-in a 
long paragraph and did a block 
copy until | ran out of memory 
— 640K at the time. Quill 
continued to increment page 
numbering to something 
around 640. 

If you wish to use Quill for 
writing novels or a lengthy 
thesis the most practical solu- 
tion is either to page number in 
sections or chapters and orga- 
nise the document so that the 
last section starts at page 255. 

A Belgian reader wishes to 
have five or 10 more translates 
than Quill normally provides to 
use with a wide range of 
accented characters. Provided 
bold, underline, sub- and 
super-script are not required, 
each of the four pairs of switch- 
es can be used as character 
translate functions, giving ac- 
cess to eight more. 
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wish that I had learned how easy 

networking is. I run a Magistrates’ 

Court. I needed to introduce word 

processing and other desk-top office 
facilities. When colleagues were choosing 
the conventional route of obtaining the 
IBM PC or clones, I decided to go the 
inexpensive way by obtaining several 
Sinclair QLs and scattering them round 
the office. 

At first I had one to which initially I 
interfaced a Brother daisywheel typewri- 
ter via an IFSO serial interface. I soon 
added 256K memory expansion and a 
double 3.5in. disc drive and obtained a 
Seikosha SP1000A NLQ dot matrix prin- 
| ter. 

A second 512K machine was soon 
added. Printing initially was achieved by 


spooling prints to a Microdrive and trans- 
ferring that to the machine with the 

| printer. At that point I discovered a useful 

| trick. Since a QL to which no printer is 
attached will lock up if, in Quill, you opt 
inadvertently to print a file to “printer”, it 
is important to ensure that all print files 
are spooled, 

That can be guaranteed by using Install- 
—bas to install a “parallel or non- 
standard” printer and declaring the device 
to be, say, “Mdv2__prt_lis”. If such a file 
does not exist an attempt to print to 
“printer” will not hang up the machine but 
will return the error “Cannot open file”, if 

| the file exists it will be over-written. 

Despite those fairly primitive arrange- 

| ments, the demand among my staff for 
machines on which to work grew. I added 
an Epson laser printer to improve the 
quality of output while saving the cost of 
obtaining printed stationery. I also bought 
two more 512K workstations, another of 
which had a disc interface and a double 
disc drive — one 3.5in. and one 5.25in. 


NETWORKING 


THE QL 


John Davies has put 
QL networking into 
practice in earnest. 
He describes his 
experience. 


On each machine I had Taskmaster and 
on the working Taskmaster medium I re- 
named the “Boot” file as “tBoot” and 
added a boot file of my own — see 
below. This was designed to make life as 
easy as possible for my office staff. What 
it does is: 


a. Installs Ramdise software. 
b. Formats a Ramdisc. 

c. Copies to that Ramdisc “printer_dat” 
and any standard letterheads, spread- 
sheets or other files which would be 


needed on that station. 
d, Executes Taskmaster Boot file (tBoot), 


Taskmaster loaded on each 512K 
machine one version of Quill, two of 
Abacus — sharing Code — and one of 
Archive. On non-disc drive machines this 
was set up so that Quill and Archive were 
loaded from mdv2__ and Abacus — 
together with the Taskmaster utility prog- 
rams — from mdv1__ to make life as easy 
as possible; the user had only to feed 
named media alternately into mdv1__ and 
mdv2__ as each drive stopped running. 

Config__bas was used to set up the 
Psion programs to look for System Infor- 
mation i.e., printer__dat and data —i.e., 
def_tmp— on Ram1__ there be relieving 
the pressure on the Microdrives. 

At that stage my two-storey office had 
two machines on each floor. On one floor 
the machines are linked by Quadraprint 
and share the laser printer. Downstairs 
there was one machine with the Seikosha 
and one which still spooled its prints to 
Microdrive. 

Using Quadraprint required a degree of 
co-operation, since if both stations tried to 
print together they were not queued but 
the printer got both signals and printed 
gibberish until it became too confused and 
locked up. It soon became normal to hear 
cries of “Printer free?” “O.K.” echoing 
round the office. 

The spooling of prints to Microdrive 


also had one disadvantage; if one used the 
same medium more than once to transfer 
data between the same two machines 
without re-formatting, one could find that 
the receiving machine did not recognise 
the existence of files added since the 
medium was last inserted in that particular 
drive. Nothing disastrous would happen 
but it could be irritating to have to to 
take the directory of a different cartridge 
before being able to access the files one 
wanted. 

I began to look where I would go when 
the supply of QLs eventually dried up. 
Would I be able to add Thors to my set- 
up? If I wanted to include the driveless 
workstation I would clearly have to look at 
networking. I made enquiries and was 
advised that all I needed was Toolkit IT by 


Tony Tebby supplied by QJump. I en- 
quired and discovered that I would need 
the ROM version since RAM is not fast 
enough to support networking. I ordered 
three, since I was, at the same time, 
upgrading the machine with 256K additio- 
nal RAM by giving it a 640K Trump Card 
which includes Toolkit IT. 

When they arrived I set two machines 
down side by side. I connected them by 
one of the short network cables provided 
with the QL. I plugged Toolkit IT into each 
of the ROM ports and, after a brief pause 
to read the instructions I went to one 
machine and typed-in: 


NET 1 <ENTER> — the SuperBasic 
command which gives the machine its 
network identity and 

FSERVE <ENTER> — a Toolkit II 
program which enables the machine to 
act as a fileserver. 


I put a Microdrive in mdv1__ and went to 
the other machine. At the other machine I 
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typed: : 


NET 2 <ENTER> 

NFS__USE 

MDV,N1_MDV1__,N1__MDV2__ 

<ENTER> — a Toolkit IT function 
which re-directs devices through the 

network, 


I then typed in: 
DIR MDV1_ <ENTER> 


To my delight — and I confess surprise 
— mdv1l__ on the first machine whirred 
and its directory appeared on the monitor 
attached to the machine on which I was 
working. I then loaded Quill successfully 
through the network, although at first I 
thought it had failed because there was a 
fairly long pause after the Microdrive had 
stopped whirring before the opening 
screen appeared. Those who are accusto- 
med to load these programs from floppy 
disc will find that it takes much longer to 
do so through the network. The time is 
very comparable to loading from Microd- 
rive. 

The first thing to do was to install some 


wiring. I was able to do it very cheaply; 
100 metres of loudspeaker wire from a hi- 
fi shop cost £15 — 20 pence per metre less 
25 percent and eight 3.5mm. jack plugs 
cost only a few pence each. Loudspeaker 
wire is recommended since it is low- 
impedance, twin-core wire like bell wire, 
recommended in the QL manual but it has 
in addition a black line marking one core; 
this is important, since polarity must be 
maintained between the machines. 

A few minutes with a pair of wire 
strippers and a soldering iron at each end 
and the job was done; the most time- 
consuming job was finding ways into the 
hollow skirting and over the suspended 
ceiling. Inside the jack plugs one connec- 
tion was long and one short. I wired the 
core with the black (L)ine to the (L)ong 
connection. 

Once I had the four machines con- 
nected I began to learn a few things about 
how to set up the network. First I had a 
disappointment. I had hoped to have on 
each remote machine nothing more thana 
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small Boot program along the following 
lines: 

10 NET n 

20 NFS_USE f1p,n1_flp1,n1_flp2_, 
n2_f1p1__,n2__flp2__ etc 

30 FSERVE 

40 LRUN flp1_—tBoot 


I tried this and found that the copy 
protection of Taskmaster prevented it 
being executed through the network. 
Attempts to do so resulted in the “This 
copy was not produced from a Master 
copy” error. It was therefore clear that all 
the Taskmaster files would continue to 
have to be on a device physically present 
at each machine. Fortunately I discovered 
that a working copy of Taskmaster can be 
made through the network, so it is not 
necessary to go to a machine which has 
both a flp and an mdv to create on the 
latter a working Taskmaster copy. 

Then I discovered two things about 
NFS_USE. First I found, in attempting 
to achieve consistency in how devices 
were addressed from any machine, that it 
is not possible to include a machine’s own 
drives in the paramaters. If you were to 
attempt the following: 


NFS_USE fip,flp1—,flp2__,n2__ 
fIipt zoe 


attempts to save to f1p3__ or f1p4— would 
save successfully on station 2 but attempts 


to use flp1_ or flp2__ would be unsuc- 
cessful; one’s own floppy drives would be 
inaccessible from one’s own machine. 

Fortunately, however, the device 
names given do not need to be actual 
devices so it is possible to use, e.g., Dev 
(for Device) or Rem (for Remote). So a 
machine which has its own floppies and 
Microdrives can load and save from/to 
Dev1_ to Dev8_,flp1_— and flp2__ and 
mdvl_ and mdv2_. 

One thing you cannot do is achieve a 
situation where you have one set of 
network devices called, say, Devl— to 
Dev8_ and, at the same time on the same 
machine, another set called Rem1_ to 
Rem8_. The second use of NFS_USE 
would wipe out the first set. It is possible 
however, to have up to eight network 
devices and they can include ‘directory’ 
devices: 


Dev1— can be nl_flp1_— 
Dev2__ nl_flp2_Jad_ 
Dev3__ pn1_flp2_abc_ 


Myfile__doc saved to Dev2__ would be 
saved on Station 1, f1p2__ as jad__myfile- 
—doc and if saved to Dev3__ it would be 
saved on the same medium but as 
abc__myfile—doc. 


I have taken advantage of this to try to 
limit the extent that the media get ‘silted 


up’ with old unwanted files. On each 


station, except the file server, Dev3__ and | 
Dev4_ are set as nl__flp2_sN__we_ 
and nl_flp2_sN_-_mo_ respectively. 
In these assignments ‘N’ is replaced by the 
Station number. The result is that if 
myfile_doc is saved on dev3__ from 
station 2 and a file of the same name is | 
saved on dev4— from station 5, the 
directory of station 1, f1p2_ will be found 
to contain: 


S$2__we__myfile—_doc 
sS_mo__myfile—doc 


The intentions are that: 


a. Dev3 should be used for very 
temporary material required to be re- 
tained for only a (we)ek and Dev4__ for 
slightly longer-lived material retained for 
only a (mo)nth. Further, since these files 
would also be sub-divided by the station 
from which they were saved, it will be 
possible to check with the ‘owners’ before 
deleting material. 

b. Each station should be able to save 
and over-write files without fear of des- 
troying someone else’s work. 

Let us suppose that a network of four 


QLs has two printers, one a dot matrix 
printer and one a laser printer, both with 
serial interfaces and attached physically to 
stations 1 and 2 respectively. Each printer 
will require two printer drivers, the files 
called printer_dat, one with serl__ as the 
device and the other (created by using the 
parallel or non-standard option in install- 
—bas) with nN_serl— as the device 
name where N equals 1 or 2 depending on 
which printer is attached to which station. 

Clearly those four files cannot all be 
saved on the main file server under the 
same name and so J give them mnemonic 
names: 


remlas__dat — for the laser printer acces- 
sed through the net 

loclas__dat — for the laser printer acces- 
sed directly 

remdmp__dat — for the dot matrix printer 
through the net 

locdmp_dat — for the dot matrix printer 
directly accessed. 

Each station will require two of these 
files available to it. Stations 3 and 4 will 
each require remlas_dat and remd- 
mp—dat, station 1 will require locd- 
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file being accidentally left open on the 
fileserver: this could occur if a remote 
station had to be re-set while it was using a 
file through the network. This situation 
can be cured by removing and _ re- 
executing Server. This can be done by 
going into SuperBasic on the fileserving 
machine — <ALT> 9 from Taskmaster 


mp—dat and remlas_—dat and station 2 
will require remdmp—dat and _loclas- 
—dat. On being copied over to the device 
which has been set by Config__bas as the 
‘system information’ device {I use 
Ram1_) one of these two programs will 
need to be re-named — using the rename 
function in Toolkit IT — to printer_dat. 
This should be the ‘default’ printer, i.e., 
the one which that station will normally 
usc. 

When in use, output can be diverted toa 
different printer by re-naming printer- 
—dat as something else and re-naming the 
‘spare’ printer driver as printer—dat, if 
you are using Taskmaster or SuperBasic. 
This will be made particularly easy if the 
names you use differ only in the last letter, 
€.g., ‘printer__dat’, printer_datl’ and 
‘printer_datd’. If you are using one of the 
Psion quartet by itsclf the same can be 
achieved by copying printer_dat to a 
different name, using Files Backup, and 
the copying the ‘spare’ printer driver to 
printer_dat over-writing the former file. 

Earlier when dealing with the use of 
Quadraprint I explained how it was 
necessary to ensure that two stations did 
not try to use the printer at the same time. 


No problem 


With the network this is no problem, If 
an attempt is made to send output to a 
printer which is in use the error “cannot 
open file” will be returned. Even this can 
be avoided by setting up a printer buffer 
on each machine to which a printer is 
directly attached, This is done with the 
command: 


prt__use ser,ser,ser 
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which will set up buffers on both serial 
ports; this can be included in a program. 
Any print files sent to the printer when it is 
in use will be queued in memory until the 
printer is free. A revised version of my 
boot program: 


a. establishes network devices 

b. copies various ‘standard’ files, includ- 
ing printer drivers, through the network 
c, Sets up printer buffers and 

d. executes Taskmaster 


Ona machine which has Trump Card or 
any other expansion which contains Tool- 
kit I] rather than having Toolkit IT in the 
ROM slot, this will need to start with an 
extra line: 


! TK2__EXT 
to ‘switch on’ Toolkit IL. 


Toolkit II includes a program, Server, 
which must be executed on any machine 
which is to act as a fileserver. In practice I 
tend to execute it at every station so that, 
if desired, files can be transferred between 
any pair of devices anywhere in the system 
in either direction. This program is execu- 
ted by the command “FSERVE”, which 
once again may be included in a program. 

Care must be taken as to when precisely 
it is executed since, if there are any 
programs which make use of the RESPR() 
SuperBasic Function, Server cannot be 
running when the function is called. As a 
result, I leave it as late as possible and 
include it in the Taskmaster boot prog- 
ram, re-named as tBoot, immediatcly 
before the line which EXECs Taskmaster. 

Network problems may be caused by a 


— and executing the following direct 
commands: 


RJOB Server 
FSERVE 


This will generally restore the situation. 


On one occasion one of my staff went to 
a remote station which was printing a 
lengthy document from Archive during 
which my sccretary had ‘queued’ three 
letters in the buffer. Thinking that the 
remote machine had ‘frozen’ for some 
reason, she re-set it. The printer stopped, 
nothing came out. I did RJOB Server, 
FSERVE and out came my secretary's 
three letters; the system is remarkably 
resilient. 


Extravagant 


There is only one potential area of 
difficulty and this concerns Quill. This 
program had a working file ‘def_tmp’ 
held on the device configured by Config- 
—_bas for Data. Thought must be given as 
to what device to use so that different 
copies of Basic at different stations in the 
network are not all trying to use the same 
file. One way this could be done would be 
to have a variety of differently-configured 
Quills, one for each station. At about 53K 
of disc space a time this is a comparatively 
extravagant way of doing it. Two more 
sensible methods would be: 


Sinclair/QL World July 1989 


a. Configure Quill so that the data files 
are held on a device which is accessed 
directly trom each machine e.g., Ram]_— 
and not through the network from a 
shared medium or 


b. Configure Quill so that def_tmp is 
held on. say, Dev4_— and use nfs__use to 
ensure that at cach station Dev4_—_ is a 
different directory device. c.g., 

_flpl_sN— where N is the station 
number. 

If it is desired to multi-task two versions 
of Quill on the same machine there is no 
option but to have two differently- 
configured versions of the program — 
Quill and Quill2 — holding their data files 
on different devices. This is a limitation 
which applies only to Quill and not to 
Abacus, Archive or Easel, I have not tried 
this but it may be possible to get away with 
two similarly-configured versions of Quill, 
possibly code sharing in Taskmaster if one 
is used for background printing of saved 
tiles so that it never has to access def-tmp. 

There is a limit to how long a directory 
device name you can assign by nfs__use; 
the limit seems to be reached with about 
two levels of ‘sub-directory’, e.g.. 
nl__winl__s3__mo__ is about as far as 
you can go, If care is taken in thinking the 
file structure in advance this should be 
adequate. 

There is some inconsistency between 
what is acceptable to the Psion suite and to 
Taskmaster. In the following examples I 
assume that nfs_use has been employed 
to ensure that: 


Dev1— is nl_fipl_— 


Dev2_ is nl__flp2__ 
Dev3_ is nl_flp1__s3__we_ 
Dev4__ is n1l__flp1_s3__mo__ 


The Psion suite will not accept as a valid 
filename anything which does not begin 
with a pattern like “AAAnn__” where A 
respresents a letter and n a number. In 
consequence, an attempt to load, say, 
‘nl_flp1l_s3__mo__myfile_doc’ will be 
rejected with the error report “Not a valid 
Quill file.” Fortunately, however, the 
suite of programs will accept 
‘Dev4__myfile_doc’ and load ‘myfile- 
—doc’ correctly from the directory device 
‘nl_flp1—s3__mo__ 

Taskmaster works a little differently. 
As the “From” device it will accept either 
the form “ni_flpl__” or the form 
“Devl_”. For the device name, however, 
it clearly reads no further than this and 
whether one selects Dev1_, Dev3__ or 
Dev4__, one gets the same complete list of 
files listed on nl__flp1— listed as, for 
example: 


QUILL 

remlas__dat 
s3__we__myfile_—_doc 
s4__spread__aba 
sS_mo_mylet—doe 


This list can be narrowed only to the 
directory device dev3__ by selecting files 
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This list can be 
narrowed only to. the 
directory device. dev3__ 
by selecting files which 
contain “s3__we_~ in 
their utles. Since Task- 
master docs not permit 
two string — searches 
simultaneously this is a 
regrettable limitation. 

It can also be a little 
confusing since. if one is 
using Taskmaster. say, 
to remove some un- 
wanted files, the use of a 
directory device — 
dev3__ or dev4__ — will 
not work. I suppose what 
happens is that if you try 
to remove the third file 
from the above list from 
Dev3__. what you will 
try to remove is 
s3__we—s3_we— my- 
file__doc from = nl_— 
flpl_— and no such file 
exists. Unfortunately. 
however, to add to the 
confusion, the screen 
display will react as if the 
file had been deleted but 
looking again at the 
directory will indicate 
that it has not. 

Another little foible is 
that if one is using the 
~Choose a file” option in 
Taskmaster to select a 
file for, say, Quill and 
assuming one has chosen 
the device *Dev3_ and 
chosen from that s3__ 
we__myfile_doc. — the 
filename which — will 
appear on the command 
line on return to Quill 
is “nl__flpl_s3__we_ 
myfile__doc™ which is, 
of course, “Not a valid 
Quill file.” One can edit 
it to “Dev3__myfile— 
doe” and acquire the file 
that way but it is a little 
irritating. 

Finally, if one uses the 
software re-set facility in 
Taskmaster on a machi- 
ne which has Trump 
Card installed, pressing 
FI or F2 when the Sine- 
lair copyright screen 
appears achieves no- 
thing. The machine 
appears not to recognise 
the presence of any de- 
vices. One has to re-set 
the machine further us- 
ing the re-set button. 
These little details apart. 
the system is remarkably 
casy to use and flexible. 
It is a pity this versatile 
machine has been sold so 
short. 


List 1 


Program to ease boot up for non 


computer literate office staff 


100 
110 
115 
130 
140 


150 
155 
157 
160 
170 
180 
190 
195 
200 
210 
220 


m = RESPR(2048) 

LBYTES mdvi1_ram_ rd bin,m 
CALL m oN? 
FORMAT raml_ 200 

ae "Copying to Ramdisk 
"flethead | s 
"lethead doc", 
"llethead Soc", 
"findef aba",1 
"laser ant" | 
"printer | dat", : 

cop "default aba", 

cop "beisbal_aba", 2 

cop "PAGE DOC", 

LRUN mdv1 eee 

DEFine PROCedure cop 


cop 
cop 
cop 
cop 
cop 
cop 


(f£$,f) 


230 
240 


PRINT, £$ 
COPY md" &£&" _"&£$ TO 


"raml "&f$ 


250 


END DEFine cop 


List 2 


Modified version of list 1 for use 


through the network 


160 
110 
115 
120 
125 


dev,nl_flp1_,n1 flp2_,n2_flpl_,n 
pe Flp2 # 


2 
s 


136° 


135 
140 


150. 


155 
157 
160 
170 
175 


180 
185 


TO raml 


190 
195 
200 
210 
220 
230 
240 


m = RESPR( 2048) 

LBYTES mdvl_ram_rd_bin,m 
CALL m oo 

NET 4 

NFS USE 


_flp27 ,n2_flp2_s4_we_ 
MO_ faz. raml1_ 

PRT _USE ser,ser,ser 
FORMAT raml 200 
PRINT "Copying to Ramdisk 


"flethead_ doc" 
"lethead doc" 
"llethead doc" 
"findef aba" 
“remlas dat" 


cop 
cop 
cop 
cop 
cop 
RENAME raml remlas _dat TO 
raml_printer | datl 


cop "nlqprint dat" 
RENAME raml_nigprint dat 
rinter dat — 
cop "default aba" 

cop "bcisbal aba" 

cop "PAGE DOC" 


LRUN mdv1 tboot 

DEFine PROCedure cop (f$) 
PRINT, f$ 

COPY "dev1_"&f$ TO 


"raml_"&f$ 
250 END DEFine cop 


Information 

Program: Coursemaster 
Supplier: Intraset Ltd, 6 
Gilderdale Close, Gorse 


Covert. Birchwood, War- 


rington. Cheshire WA3 
6TH. 
Price: £14.95 inc. p&p. plus 


£1 for cartridge. 


ith the adverse 


publicity about 
smoking and 
drinking, vices 


are difficult to enjoy these 
days. A vice which has poten- 
tial for further growth is gamb- 
ling. Spend £3 on a bottle of 
wine and you get a moment of 
pleasure, an empty bottle — 
and a headache. Spend £3 with 
a bookie and you get an after- 
noon’s racing and your moncy 
may be refunded or multiplied. 

What has this to do with your 
QL” My guess is that as a QL 
enthusiast you have a streak of 
the gambler in you. Your OL is 
sometimes rewarding, some- 
times frustrating, just like the 
favourite in the 2.30 at Doncas- 
ter. Software which allows you 
to indulge your computer 
addiction while having a go at 
Ladbrokes is indeed tempta- 
tion. 

Coursemaster is a computer 
racing program which aims to 
improve your chances of show- 
ing a profit on your bets. Itison 
Microdrive cartridge only but 
works on expanded OLs. The 
package includes a_ small- 
format 20-page manual and 
betting guide. 


Newspapers 


The program provides the 
user with a series of menus 
from which functions are cho- 
sen with single keypresses, 
with the option of returning to 
the main menu usually avail- 
able. The main purpose of the 
program is the assessment of 
races which requires the input 
of information from daily 
hewspapers concerning the 
race and form of the horses. 
The program first advises on 
whether the race looks promis- 
ing. The punter is nudged away 
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FIWARE FILE 


Horses for courses, the saying 


goes, but will Coursemaster 
make you a horsemaster? 
Andrew Shepard finds that 
picking a winner is not so easy. 


from races with very large or 
small ficlds, or where there are 
too many horses which have 
not raced recently and exposed 
their form. The program then 
asks for details of the horse's 
last two races and if it has won 
previously on the course or 
over the distance of the race. 

Having input the relevant 
data for all the runners — the 
work of a few minutes once the 
prompts are familiar — the 
punter can see an assessment of 
the race. The program 


offers a range of 
graded advice. 
If things 


look close it 


may 
ask for 
more in- 
formation 
in the form of the forecast 
betting odds. Otherwise it may 
suggest a range of bets, spot- 
ting the likely winner and good 
value each-way bets. 
Throughout the process the 
user is given opportunities to 
check the accuracy of the data 
and to make corrections where 
necessary. Races can be saved 
for the inquest when you try to 
determine what went wrong. 
Other functions — offered 
from the main menu include a 
special Coursemaster betting 
system, a betting bank account 
and options to estimate the 
profit from successful bets. The 
system bet aims to maximise 
the chances of profit by spread- 
ing the risk over a number of 


races. My researches into the 
system are not yet complete 
but if a sure-fire way of beating 
the bookies existed I would not 
be reviewing computer soft- 
ware. 

The betting bank accounts 
option injects a dose of realism 
into the proceedings. One of 
the good features of the prog- 
ram and accompanying guide is 
the emphasis on level-headed 
gambling. The idea of a betting 
bank account is a real assist- 
ance to moderation. 

The betting shops are full of 

people who have 
conveniently 
forgotten 


last weck’s disasters. The bet- 
ting account option encourages 
the punter to set aside, in 
advance, an amount which he 
can afford to lose. The gains 
and losses from each set of bets 
are entered, providing a no- 
illusions record of progress. 
The options to assess bets 
and calculate winnings are use- 
ful, with complicated bets 
which require the odds of diffe- 
rent horses to be multiplicd. 
Not every type of bet is cov- 
ered. There is no provision for 
forecasts and tricasts, where an 
attempt is made to pick not 
only the winner but also horses 
which finish second or third. 
Given the huge range of possi- 
ble bets and the guidance in the 


program towards low-risk bets, 
this is logical. Hard copy print- 
outs are available with each 
option, providing you first alter 
linc 25 of the program to the 
correct baud rate for your 
printer interface. 

The interest of this package 
is in the mixing of pleasure with 
the pursuit of profit. The advi- 
ce provided in the guide is 
sound and would make sense 
even to those who have no 
previous experience of betting. 
That is important, since to 
outsiders horse racing can 
seem like an alien world with 
its own language and the threat 
of financial ruin lurking round 
every corner. 

The program would de- 
mystify betting for the novice 
and provide a new angle of 
interest to the regular punter 
who watches TV racing or likes 
a day at the local course. 


Insufficient 


I would like to say that I 
cheered Coursemaster all the 
way to the post but, despite 
early promise, it did not pick 
up all the prizes. Not written 
specifically for the QL, it is 
slower and less sophisticated 
than the ideal racing program 
would be. Even transferred to 
disc, which is accomplished 
casily with the addition of 
‘flp_use mdv" to the boot, the 
program is slow to load and 
race assessments take more 
than half a minute in the larger 
fields of horses, 

Screen displays are clear but 
dull, with no use of graphics, 
colour or sound, More serious- 
ly, it does not utilise the capac- 
ity of the QL fully to process a 
good decal of data. Insufficicnt 
information is taken into 
account in predicting winners. 

A more accurate forecast 
would require input concern- 
ing jockeys, stable perform- 
ance and handicap weights. 
The limited scope tends to 
direct the punter towards clear 
favourites at short prices. Even 
so, Coursemaster helped me 
pick a 4-to-1 winner and it is a 
useful aid to clear thinking 
when used in conjunction with 
other information. 
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OF MICE 


AND ART 


igital Precision Eye-Q set a 

very high standard for QL art 

programs. The few art prog- 

rams which have been re- 
leased since its appearance in late 1986 
have had a tough act to follow, It is almost 
inevitable that other graphics programs 
are compared to what has become virtual- 
ly the industry standard for the QL. 

Eidersoft produced a graphics prog- 
ram, ArtiCE, to accompany its ROM- 
based /CE front-end in the early days of 
the QL. Soon after the appearance of its 
first art program, Eidersoft released anew 
version of ICE which included the first and 
long-awaited mouse. That was soon 
followed by a mouse version of ArtiCE 
called, appropriately enough, MICEart. In 
spite of its long-term availability, ArtlCE 
and its mouse-orientated variant, 
MiCEart, has never graced the pages of 
QL World. 

Much more recently Schon, best- 
known for its range of quality keyboard 
replacements, has released its second 
software product, Painter, this time aimed 
directly at the graphics enthusiast. 

In many ways, these art programs 
share a number of similarities; with their 
iespective versions — they can be used 
with or without a mouse — but the 
Eidersoft programs must be ordered in 
the standard or mouse version, while 
Painter can be used either way. 

The Eidersoft ICE ROM is a GEM-type 
environment front-end. The ICE screen, 
displayed every time the QL is re-set 
unless you hold down the ALT key while 
the QL is doing its memory check, is 
provided with icons and buttons which, 
when the cursor is moved over them and 
either the SPACE bar is clicked or the 
mouse button is pressed, the appropriate 


HEL 


COLOUR: 


Ron Massey puts 
on his beret and 
investigates a 
sophisticated new 
art program, 
Painter, and a good 
old one, MiCEart. 


command is entered, as if it had been 
typed-in. 

Since ICE uses its own pointer system it 
was almost inevitable that a mouse would 
be produced for it eventually. In a very few 
months Eidersoft introduced a mouse 
version of ICE called, appropriately 
enough, MICE. 

The Eidersoft art program is available 
as either of two distinct types, both of 
which require the ICE ROM and its 
integral pointer environment, for use with 
keyboard only and for use with the mouse 
version of ICE only. To save some 
confusion, the Eidersoft programs will be 
referred to as MICEart because, except 
for one of them being mouse-compatible, 
both programs are otherwise identical. 

The Eidersoft mouse is distinctive in 
that it has three buttons. In effect, the left 
button is equivalent to pressing the space 
bar once; the centre button, clicking 
SPACE twice in rapid succession. The 
right button is used for special program 
applications; MiCEart uses the right but- 
ton to select solid ink colours sequentially, 
beginning at black and progressing to 
white. 

On starting MICEart, you are presented 
with the drawing screen and a large disc- 


LOLOL 


shaped brush. If you wish to start drawing, 
clicking the left button toggles the brush 
on. Access to the comprehensive main 
menu is made by clicking the centre 
button. 

The lack of help pages in any form is 
mute testimony to the ease of use of the 
program. Ample prompts are provided 
throughout operation of the program, 
advising you of alternative choices or the 
next action required. 

Pressing the centre button, you are 
presented with the main menu. From that 
you can navigate to other program op- 
tions such as selection of ink and paper 
colours, file access, mode control, mag- 
nify, spray, text, clearing the screen and 
exiting the program. 

Colour selection for ink or paper, the 
only laborious feature of the program, is 
made by clicking on INK or PAPER, then 
one set of arrows to set the first colour, a 
second set of arrows to set the colour and 
a third set of arrows to set the stipple 
pattern — if a stipple is used. Numerical 
values in the range of 0 to 255 are also 
indicated for information. 


Brushes 


Drawing is done with the cursor pen/ 
brush which is toggled on and off with the 
left button. A range of brush sizes and 
types is available, from a single pixel, 
three discs, four diagonal lines or four 
blocks, one of which is user-definable, 
with which to draw. 

The MICEart magnification facility is 
particularly good. When active, the area 
round the cursor is magnified in a mobile 
window occupying about one-quarter of 
the screen. As the cursor is moved 
towards the window, the window changes 
screen position. 

Another particularly well-designed op- 
tion, spray painting, is especially flexible. 
You are provided with five different-sized 
nozzles and five spray densities. The full 
colour range is available to each of the 
respective modes. 

Text, in the standard QL font and range 
of sizes, is typed-in and can be positioned 
accurately by moving the cursor, which 
appears as the string you have typed-in, 
to its position and fixing it by clicking on 
the left button. The majority of drawing 
operations can be made on a trial basis. 
After most of the drawing operations, a 
dialogue box offers you a yes or no option 
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— effectively an UNDO option. Selecting 
the latter, the drawing reverts to its pre- 
operation state. Program output can be to 
printer and an uncompressed, standard 
32K file. The MiCEart printer driver is a 
conventional Epson-compatible type. 

Being driven by the QJump Pointer 
environment with which it is supplied, 
Painter can be used with or without a 
mouse, multi-tasks and is_ fully- 
compatible with QJump QRAM. If you 
want to take advantage of its mouse 
capabilities you will also need the QJump 
QIMI internal mouse upgrade or one of 
the newer versions of the Sandy Super Q 
Board, with its built-in mouse interface 
available. 

Painter starts with its menu screen, 
which consists of five groups of com- 
mands and six command buttons. The 
right-hand side of the screen is a window 
in which most of the program sub-menus 
appear. There is only a single help page 
which details the use of the keyboard for 
program control. Switching between the 
menu and the drawing screen is done by 
pressing ENTER or the right mouse 
button. Many of the commands are self- 
explanatory but some exceptional fea- 
tures have been included in the extensive 
repertoire. 

All automatic geometry is rubber- 
banded. Under the SHAPES heading you 
have the option either of a rectangle or a 
square. The latter option will maintain 
equal vertical and horizontal alteration in 


Eidersoft M/CEart 


Drawing Method 
Definition Modes 


Multiple screens f 
Transfer Image Elements No. 

Method of colour selection See Note 1. 
Command Access Mouse. 


Menu Yes; main and sub-menus. 


Help pages on screen 
Border reference 

Grid 

Cursor co-ord indicator 
Prompt Window 

Image Pan/Scroll 
Image magnification 
Auto mirror image 

Pen direction indicator 
Pen (Continuous drawing) 
Width control 


No. 
Brush Single pixel; 3 discs; 4 diagonal; 
4 blocks, one of which can be 


re-defined. 
Airbrush 
Auto fill — on select 
Expand No. 
Shrink No. 


Erase Area depending on brush size and 


shape. 
Special erase No. 


Undo With most drawing operations. 
Toggles with left mouse button. 
No. 


Pen On/Off 
XOR 
Re-colour 
Circle 
Ellipse 4 
Arc No 
Square 
Rectangle As above. 
Triangle No. 
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Continuous; pixel graphics. 
Movement into pixel position. I 
4 and 8; loss of picture at mode Point 


5 nozzles and 5 densities. 
Also separate manual fill. 


Horiz and vert dimensions independent. 


size; the former’s dimensions are set 
independently. The Painter arc feature 
relies on the flawed QL command and can 
be alittle unpredictable. Line drawing may 
be done by single lines, radial lines — 
where lines are projected from a common 
centre — or as polygons. 

On first examination the POINT option 
seems a little frivolous but the feature 


Others 
Line length 
Line width 
Line broken 
Radial lines 
Polygon 


Element movement 
Element copy 


Auto Shadowing 
Text 

Modes 

Colour 

Sizes 


Character styles 


Variable spacing (auto) 


Underline types 
Positioning 

File Control 
Default drive 


serves a special function. There are 16 
types of patterns available, ranging froma 
single pixel to a variety of pre-set shapes 
which can be used for a pen-drawing 
cursor. There is a distinct difference 
between the Painter PEN and BRUSH. 
You can select from 24 supplied brush 
patterns to draw. You can also design 
your own brushes or use a 16 x 16 pixel 


Cursor-shaped. 
No. 
Can also be saved and/or used as a 


Yes. 

Over current drawing and Off. 

Full range. 

0,0 TO 3,1 (dependent on resolution 
mode). 

Standard QL font. 

No. 

None. 

Text string cursor. 


Retain other specified drive 


Directory 

Load a screen 

Save a screen 
Compression option 
Delete a file 

Format media 
Load/Save/Edit fonts 
Brush patterns 
Printer Dump 

Area printed 


Whole screen. 


Average no. files/cartridge 10 


Principal application 
Special Features: 
1 


Two-dimensional illustrations. 


. Ink is selected by clicking the right button sequentially switches ink 


through black to white, colour numbers 0 to 7 or from the main menu, 
where the sub-menu offers buttons which are clicked to change each of 
the three components making up a stipple. Paper colour from the sub- 


menu. 


. Anon-mouse version, ArtiCE, is entirely keyboard-orientated and uses 


the SPACE bar instead of mouse buttons. Requires ICE ROM. 
. Text is positioned as if the string were a cursor. 
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cursor to select an area from your drawing 
to use as a brush. Full file handling 
facilities allow you to save and load 
individual brush files into the space 
occupied by a current brush. 

Two types of eraser are provided. The 
first is the conventional type which is 
consistent with the selected cursor. For 
larger and/or regular areas the special 
eraser is a rubber-banded rectangle. 

Colour selection may be done in either 
of two ways. Solid colours may be 
selected from the main menu palette 
buttons. By double-clicking on the stipple 
button you are offered the sub-menu 
palette from which you can select a colour 
directly either from the full range palette 
display or, very much like the MICEart 
selection system, select each colour 
component with its appropriate stipple 
pattern. : 

One Painter feature which puts it in a 
class of its own is its ability to have up to 
nine screens available — memory permit- 
ting — and being able to transfer sections 
from a selected page to the current 
drawing. 

Clicking on VIEW, the display switches 
to a map of all the screens in memory and 
a pixel representation of the drawings of 
each screen. You are offered an option to 
create a new page. A word of warning — 
the create option is not error-checked and 
if you specify a number of pages exceed- 
ing your memory capacity you are likely to 


hang the QL. File options use the QRAM 
convention, with a similar range of com- 
mands, and a specifically-efficient screen 
compression routine which squeezes a 
standard 32K screen into between 4K and 
6K of file space. Saving and loading 
compressed screens is very fast. 

A number of choices allow you to 
produce good-quality dumps of your pic- 
tures. You can select the whole screen, 
half or a selected part of the screen to 
dump. You can also specify single-, 
double- or treble-density printing. Pictur- 
es can be positioned either over an entire 
sheet of paper or can be printed side- 
ways. 


Transfers 


For different reasons | like both of these 
programs. | am not particularly fond of 
mice and, as far as | am concerned, art 
programs are the only real justification for 
using them. Having said that, though, 
screen navigation and option selection in 
all types of mouse-controlled programs is 
faster, so it is really a matter of prefer- 
ence. 

Which of the two programs you choose 
will depend largely on the way you like to 
work. If you prefer having an icon/button- 
orientated front-end, ARTice or its coun- 
terpart, MICEart, is the logical choice. 


Polygon 


Sc h ) n Painter Bernat movement 


Element copy 


Neither of the two programs can be very 
readily multi-tasked. 

Painter is designed to be multi-tasked 
with all the QJump utilities and uses the 
same pointer environment. If you are 
running QRAM you will not need to use 
the separate pointer environment sup- 
plied with the program. 

Like many art programs available for 
the ST and Amiga, MICEart allows you to 
select only one option each time you 
access the main menu. Its spray facility 
must rank as highly as any of those 
available for other machines. The Painter 
spray facility is simulated in that a drawing 
cursor producing the “spray” is a fixed but 
re-definable pattern. 

Even if you are not artistically inclined, 
the Painter text editing features make the 
program worth having for this one applica- 
tion alone. In addition to including its own 
font designer you can display the current 
font in normal or bold lettering and in one 
of four types of italics. 

Characters, occurring from the upper 
left corner of the cursor position, may be 
printed as Outlines or Shadow, as well as 
standard lettering. Choosing the Shadow 
option you can specify top, left, bottom 
and right shadowing in any combination. 

Overall, my vote goes to Painter. It is 
one of the most versatile and powerful art 
programs yet released for the QL. Its only 
disadvantage is that a few of its oper- 
ations are a little slow. 


Yes. 
16 footprint patterns. 
No 


Can also be saved and/or used as a 


Drawing Method 


Definition Modes 
Multiple screens 
Transfer Image Elements 


Method of colour selection 
Command Access 

Menu 

Help pages on screen 
Border reference 

Grid 

Cursor co-ord indicator 
Prompt Window 

Image Pan/Scroll 

Image magnification 

Auto mirror image 

Pen (continuous drawing) 
Width control 

Brush 

Airbrush 

Auto fill — on select 

| Expand 

Shrink 

| Erase 


Special erase 
Undo 

Pen On/Off 

| XOR 

| Re-colour 


Continuous; pixel graphics. 
Movement into pixel position. 

4 and 8; 

Up to nine, memory permitting. 

From selected screen to current 
screen. 

See Note 1. 

Mouse and/or keyboard. 

Yes; main and sub-menus. 


With some options. 

Yes; whole screen or selected area. 

Yes. 

Yes; rotate in 90° increments. 

Yes. 

No. 

24 patterns supplied. See note 3. 

Simulated with pixel pattern block. 

Also separate manual fill. 

Yes. 

Yes. 

Area depending on brush size and 
shape. 

User definable block. 

With ESC. 

Toggles with left button/SPACE. 

To current ink colour. 

Full-screen or selected area. 


Auto Shadowing 
Text 

Modes 

Colour 

Sizes 


Character styles 
Variable spacing 
Underline types 
Positioning 

File Control 

Default drive 

Retain other specified drive 
Directory 

Load a screen 

Save a screen 
Compression option 
Delete a file 

Format media 
Load/Save/Edit fonts 
Brush patterns 


Printer Dump 
Area printed 


Density 

Average no. files/cartridge 
Principal application 
Special Features: 

1 


brush. 

No. 

Yes. 

Over current drawing, XOR and Off 

Full range. 

0,0 TO 3,1 (dependent on resolution 
mode). 

Normal, 4 Italics, Bold. See note 2. 


Between characters and proportional. 


16. 

From current text cursor position. 

QRAM-type display. 

fip1. 

Yes. 

Yes. 

Yes. 

Yes. 

Yes. 

Yes. 

Yes. 

Yes. 

24 supplied. With design, load and 
save options. 

Yes. 


Whole, half or part screen; sideways or 


whole page. 
1 to 3. : 
10 uncompressed. 
Two-dimensional illustrations. 


. Colour can be selected directly from the main menu by clicking on the 
palette display. Clicking on the stipple button selects the current 
stipple. 

Alternatively, double-clicking on the stipple button opens a full- 
screen sub-menu. It comprises of a large window, contraining blocks of 


| Circle Yes. 

Ellipse Yes. 

Arc Yes. 

Square Horiz and vert dimensions linked. 
Rectangle Horiz and vert dimensions independent. 


Triangle No. all of the colours available to the mode, a pair of solid colour palettes, 
Others Block. four buttons representing the four possible stipple patterns and a 
Line length Yes. windowing displaying the selected colour. 


Line width No. 2. Brushes may be composed of one of the 24 supplied patterns, selected 
Line broken 16 types. from a 16 x 16 pixel area of the current drawing, may be a solid colour 
| Radial lines Yes. or may be loaded into from a pattern file. 
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ean 


Imost every computer program- 

mer has an ambition to write a 

home finance program which 

will keep track of cheques, 
balance budgets and plan future finances. 
Many such programs are started, some 
are finished, but | suspect only the 
smallest minority are every used. The 
disadvantage of using a computer prog- 
ram to control personal accounts is that it 
is too powerful for the job. Booting the QL, 
loading a program and saving a data file 
just to record the issue of a cheque is not 
worth the effort. 

To make a conventional financial prog- 
ram work for you it must be updated 
reqularly with information. The incessant 
demand for cheque numbers, amounts 
drawn, income received, interest added 
and deducted and standing order renewal 
dates soon overwhelms the average 
user's enthusiasm and the program is 
abandoned in favour of a pencil and the 
back of an envelope. 


BUDGET 


Personal budgeting is a perfect exam- 
ple of what a spreadsheet is good at doing 
and so Abacus was chosen as the tool to 
implement the Sinclair QL World Budget 
Planner, an application most readers 
should find useful. Before plunging into 
the technical aspects of programming a 
spreadsheet it is worth analysing what 
happens when planning a budget. Income 
is balanced with outgoings so that, with 
luck, the latter does not exceed the former 
in the long term. Problems occur when 
either income or expenses, or both, are 
irregular. Eventually a spate of bills will 
exceed the available income. 


Staircase 


Budgeting means calculating how 
much to put aside and when. If every bill 
had to be settled in December a simple 
budget would involve putting aside one- 
twelfth of the predicted total debt each 
month. The balance of the budget 


PLANNER 


The most basic home finance programs 
reveal little information the user does not 
already know and their claims of pinpoint 
accuracy usually founder on the calcula- 
tion of bank charges, interest calculations 
and rate demands. Most people are not 
concerned with maintaining records of 
expenditure or balancing the books to the 
nearest penny and they do not enjoy 
slaving at a computer program just to 
confirm that the latest bank statement is 
correct. 


Invaluable 


People are generally more interested in 
making sure they they can meet the next 
electricity bill or save enough for a 
holiday. For this exercise a computer is an 
invaluable aid and yet few financial soft- 
ware packages tackle the problem of 
budgeting. 

A budget management program could 
undoubtedly be written in SuperBasic but 
there is a much simpler solution available 
to every QL owner, the Psion Abacus 
spreadsheet. Spreadsheets are very 
effective at dealing with repeated calcula- 
tions which form simple patterns based on 
columns and rows. Spreadsheets are 
straightforward to program and easy to 
keep updated. Most important, they are 
particularly good at processing what-if? 
enquiries when figures are changed tem- 
porarily to see the effect on other parts of 
the spreadsheet 
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account would increase each month so 
that on a graph it would look like a 
staircase rising from January to Novem- 
ber. In December, of course, the account 
is cleared to meet the debts and the graph 
falls to zero. 

Reality, of course, is different. Bills 
arrive monthly, quarterly, annually or 
irregularly; some bills are for regular 
amounts and others vary with the sea- 
sons. Calculating a savings staircase for 
each month would be a splendid basis for 
a sensible budget, except that the effort is 
probably not worthwhile even with the 
help of a calculator. The long-winded 
sums would need to be re-calculated 
every time a bill was increased or a new 
commitment was added or a debt needed 
to be cleared earlier than expected. 

With a spreadsheet, however, all the 
calculations are contained in a few for- 
mulae based on amounts placed in the 
spreadsheet cells. The amounts can be 
changed as often and as radically as 
required but the fundamental relation- 
ships between them remain the same and 
the entire spreadsheet can be re- 
calculated in seconds. 

In the Sinclair QL World Budget Plan- 
ner the spreadsheet is divided into three 
distinct parts. Beginning from the left of 
the spreadsheet, the first part contains 
details of all known debts with their 
amounts entered in columns according to 
which month they become due. Budget- 
ing is never an exact science and so 


amounts are rounded to the nearest 
pound and many of the figures inevitably 
will be estimates. Although the example 
spreadsheet shows only a few rows, a 
proper working spreadsheet might have 
dozens of entries covering gas bills, car 
servicing, standing orders, insurance pre- 
miums, savings schemes and so on to the 
limit of the QL memory. 

The second area comprises mainly a 
12 x 12 matrix and it is here that the major 
calculations take place. Each column 
represents a staircase of gradually- 
increasing amounts set aside for each 
month's expenditure throughout the year. 

To create the budget spreadsheet the 
instructions accompanying this article 
should be followed closely. It is recom- 
mended strongly that an exact copy of the 
example spreadsheet is created, tested 
against the output reprinted here and 
before modifying it to suit your circum- 
stances. It has been assumed that 
readers know how Abacus works. If this is 


Mike Lloyd employs 
Psion Abacus to provide 
a spreadsheet which will 
predict your cashflow 
and can be updated. 
quickly 


your first spreadsheet, keep the User 
Guide close to hand. 

The three-diagrams accompanying this 
article contain all of the important Abacus 
commands needed to make the spread- 
sheet application work. Each command is 
linked to the spreadsheet cell to which it 
applies and shows either a formula or an 
Abacus command. There is no room to 
include many minor instructions covering 
such aspects as text justification and 
column widths. Similarly, text not related 
to a formula has not been included in the 
commands. Text can be entered by 
moving the cursor to a cell and typing a 
double quotation mark followed by the 
required letters. The text string is not 
closed with a quotation mark. 


Integers 


As an example for QL users new to 
Abacus, it will be convenient to change 
the Abacus numeric input to integers 
before entering any other commands. 
This is done by pressing F3 to obtain the 
command mode and then pressing “U" 
for the units command, “D” to signify the 
Default option, “I” to obtain integer input 
and the Enter key to select a minus sign 
for negative values. Had this been inclu- 
ded in one of the diagrams it would have 
been written: 


F3 Units, Default, Integer, Minus sign 
The first area in the spreadsheet has a 
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details column with each item entered 
directly as text followed by 12 columns 
headed by the name of each month in the 
year. Your spreadsheet does not have to 
start with January but it is convenient. 

The most important rows are those 
detailing income and the total expendi- 
ture. They must appear in the same rows 
as shown in the example if the formulae 
elsewhere in the spreadsheet are to be 
correct. The income figures indicate that 
the user is paid the same amount per 
calendar month. Adjustments would need 
to be made for people paid daily or weekly 
amounts or with irregular income. 

Itis important to note that the income for 
a month usually relates to what was 
earned in the previous month. Someone 
paid on a daily rate would receive 28 days’ 
pay for February at the same rate per 
diem as for March, a 31-day month. 

It would be conventional to place the 
total monthly expenditure row at the 
bottom of the columns but the position of 


[Fa] Grro, Wrorn, 4, Fron 
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the row would then change when rows are 
added or taken away. By placing them 
near the top of the columns the total 
figures never move their location and the 
number of rows used can be altered with 
no alterations to the rest of the spread- 
sheet. 

Monthly expenses which do not vary 
need be entered only in the January 
column and then echoed to the other 
columns for the year, as shown by the 
entry for mortgage repayments in the 
diagram. Irregular amounts are entered 
directly into the appropriate cell. The 
example spreadsheet also shows how 
estimates for electricity bills vary to take 
account of seasonal variations in fuel 
used. 

The second part of the spreadsheet is 
the matrix of staircases showing that each 
month's total expenditure has been 
divided into 12 equal parts and one part is 
being saved each month. The entire 
matrix is governed by a single formula 


copied into each of the 144 cells. A feature 
of the matrix which is always present is a 
diagonal line of zeros crossing the matrix 
from top left to bottom right. For May, the 
fifth month, the zero appears in the fifth 
row of the fifth column, counting from the 
top left corner of the matrix. 

Immediately to the right of the matrix 
each row is totalled. If they were the 
required minimum — end-of-month 
balances the budget scheme would prob- 
ably be unworkable but there is an extra 
calculation in the third part of the spread- 
sheet which reduces those figures. 

The final part of the spreadsheet is a 
synopsis of the budget for the year. The 
months of the year are now arranged 
down the side of the spreadsheet, with 
columns for income and expenditure 
repeating information from elsewhere in 
the spreadsheet. The most important 
column is the minimum end-of-month 
balance which is derived from the matrix 
totals. 
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“Synopsis of Monthiy Income and Expenditure” 


In this example the matrix totals show once the commitments have been met. _ effect they have on the synopsis columns. 
that the balance of the account would Anadvantage of this budgeting scheme is When the budget has been finalised, 
never fall below £4,555, the lowest figure —_ that, provided your income is regular, you _ take a printout for ready reference when 
in the column. If, therefore, all of the — will be left each month with a similar the bank statements arrive. The program 


figures were reduced by £4,555 the amount for incidentals and luxuries. 


account would never be in the red, 


needs to be referred to again only if your 


When the spreadsheet has been built, — budget changes or if you want to see the 


although for one month it might be empty. | saved and tested, what next? First, the impact of, say, buying a more expensive 
As an empty account is not generally a example amounts need to be replaced holiday or repaying a loan early. 


good idea, a safety factorof£50 hasbeen with figures applicable to your circumst- 


| have been using this budgeting 


built into the calculations in column AE. ances. The totalincome andtotalexpend- —_ system for four years and it has proved its 

lf this final adjustment to the figures _ iture figures at the bottom of columns AC — worth. It has identified precisely how 
seems too good to be true, let me assure and AD should then be checked to make — much of my bank balance can safely be 
you that it is correct and that following the sure that income exceeds expenditure — spent on luxuries and how much must be 
budget will not lead you unexpectedly into overthe year. Youmaythenwishtoreturn kept for future commitments. Best of all, 
trouble. The final column in the spread- to the first part of the spreadsheet and the application is free, easy to use and 
sheet shows how much income remains change some of the figures to see what quickly adaptable. 
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ELECTRONICS LTD 
AT LAST PERFORMANCE PRODUCTS FOR YOUR QL. 
RB 100 — 
WINCHESTER DISC CONTROLLER 


(Price £195) 


@ High performance Westem Digital Chipset 
@ Standard ST506/ST412 drive interface 

@ 8K byte sector buffer 

@ Plugs into QL expansion port or backplane 
@ Controls up to two physical drives 


RB2000 — 
CONTROLLER + 20M DRIVE + PSU 
(Price £399) 


@ Ready to go system 
@ Elegant styling 


RBSOE/RBSOOE EXPANSION 
BACKPLANES 
{£83 or £192 EACH) 


ALL PRICES INCLUDE VAT AND P&P 
To order: Please fill in coupon and post to 


REBEL ELECTRONICS LTD 
12 YORK PLACE, LEEDS LSi 2DS. Or telephone 
0757 86630/0904 708073 
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THE NORTHERN 
SINCLAIR SHOW 


avid Batty and 

Sector Software are 

to be congratulated 

for their bravery in 
organising the first Sinclair 
show in the north and also on 
their choice of venue. Stokes 
Hall at Leyland, Lancashire is 
a pleasant setting and 
reasonably-priced food was 
available. The atmosphere was 
definitely “microfair” but as a 
customer I felt more relaxed 
and human all day. 

The show was attended by 
more than 30 exhibitors, most 
selling QL-specific or related 
items. The event was held on 
two levels with two main rooms 
full of stalls, the remainder 
being housed in the foyer. 
Principal QL suppliers exhibit- 
ing their wares were Digital 
Precision, Sector Software, 
PDOQOL, Miracle Systems, TF 
Service, Strong Computers, 
Qualsoft and Super User 
Bureau, 


Throng 


Sector Software had the 
largest and best-sited stall, 
which was very busy through- 
out the day. Hidden from sight 
by a throng of eager customers 
were the adjacent stalls of 
Digital Precision and PDQL, 
SUB was selling copies of the 
second issue of its club magazi- 
ne. There were apologies for 
being about a year behind but I 
was assured that further issues 
will emerge. They were also 
digitising faces and printing 
them out for £1.50 and had a 
steady stream. of children 
queueing for the service. 

In the foyer TF Services and 
Qualsoft were side by side and 
must have won the award for 
the highest number of working 
computers on one stall, with 
QLs, PCWs, Psion Organisers 
and an ST all running next to 
each other. Miracle Systems 
attended but had a shortage of 
stock. It blamed that on under- 
estimating demand for its pro- 
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Sector Software has founded a OL 
micro show of a different kind — a 


show in and for the north. Now users 
who were daunted by the long trek to 
the London Microfairs have an 
alternative. It seems set to be a 
pronounced success, reports 


Desmond Barry. 


ducts in the previews two 
months earlier and was talking 
mainly about its hard disc drive 
which was on display. 

Rebel Electronics, a com- 
pany new to the OL scene, was 
displaying a non-working ex- 


Home Computers selling 
daisywheel typewriters which 
doubled as computer printers 
for £89. It also had a good stock 
of new QLs for less than £100 
each. 

The show was very busy in 


The throng at Leyland Hall checks new wares. 


ample of its hard disc interface 
which is said to use hard discs 
of up to 80MB capacity and 
operates as faster speeds. The 
Miracle drive will work with 
the Trump Card but the Rebel 
drive needs a smaller QL to 
work. 


Bargains 


Impact Entertainments de- 
monstrated a Trivial Pursuit- 
type game and a horse racing 
predictor. On the non-QL-spe- 
cific stalls there were also some 
good bargains, with U.K. 


the morning and I found it 
difficult to get near to many of 
the stalls but by about 2pm the 
crowds started thinning and the 
exhibitors had more time to 
talk. 

A licensed bar was open 
throughout the exhibition, 
serving as a meeting place for 
QL enthusiasts. Food was 
available in the cafeteria 
throughout the day, well orga- 
nised with good cutlery, ser- 
viettes and tablecloths, and 
good value food. 

Sir Clive Sinclair’s new Cam- 
bridge Satellite TY system 


should have been at the exhibi- 
tion but was not ready. Leaflets 
were available on the system 
from the Sector Software 
stand. While talking to the 
Sector staff I asked for a copy 
of Ferret and was told the disc 
box had been left open over- 
night and it had escaped. Then 
it was admitted that there had 
not been time to get it ready for 
the show. 

Freddy Vaccha of Digital 
Precision gave an impressive 
talk about his new MS-DOS 
emulator and kept me capti- 
vated for more than half an 
hour. 

Harvester Information Sys- 
tems had new software for the 
Z-88, including a typing tutor 
and spelling checker. It was so 
new it was still being copied 
during the show. 


Radio 


Radio Lancashire had _ its 
outside broadcast van in 
attendance and transmitted 
live from inside the building, 
while Lancashire Evening Post 
girls distributed complimen- 
tary newspapers specially 
printed with the Northern Sinc- 
lair Show logo and the names 
of the five companies which 
sponsored the paper give- 
away. 

Living in the north of Eng- 
land I was pleased to see that 
we at last had a show of our 
own rather than having to 
travel to London. The majority 
of people, who appeared all to 
be local, shared that view. Few 
of those present had made the 
journey from the south. One 
man told me that he and his 
friends had crossed on the ferry 
from Northern Ireland. 

Afterwards I telephoned 
Sector Software —0772 454328 
— and was told that as the 
event was such a success more 
shows are scheduled for June 
24, September and one in De- 
cember for Christmas. 
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# QL WORLD DIY TOOLKIT JULY 1989 - MEM device driver, 
# version 0.9, copyright Luca Pivato & Simon N Goodwin. 


+ 


mee_ptr 
buff_id 
chan_link 
buff_adde 
buff _flag 
+ 


equ 
equ 
equ 
equ 
equ 


lea.) 
lea.l 
move.] 
lea. 
sove,! 
lea.l 
nove.] 
lea.l 
jea.l 
mavesl 
lea. 
aove.] 
lea.] 
wove.) 
lea.} 
noveg 
trap 
rts 


start 


+ 
linkage 
io_pointer 


dc.t 
dewd 
deel 
dc. 
# 

buff _ptr 
chan_ptr 
+ 


deol 
dc. 


24 
28 
0 
uM 
38 


serio _ptrs,al 
io_ready,a2 
az, labit 
tetch_byte,a2 
a2, ladi+ 

send byte, az 
a2, (ad) + 

10 pointer, ad 
io_cade,a2 
a2, (a@)+ 
apen_code, a2 
a2, (aQ)+ 
close_code,azZ 
a2, (adi+ 
linkage, ad 
#32,d0 

4h 


Current NEM pointer 
Word ID of buffer 
Channel list pointer 
Buffer start address 
Word persistence flag 


Set up SERIO linkage 


Set up device linkage 


Link the MEM device 
MT.LIOD key 


Return DO to caller 


Link to next device 
Pointer to 1/0 cade 
Pointer to OPEN code 
Pointer to CLOSE code 


Start of buffer list 
Start of channel list 


# Code to handle TRAP #3 calls: I0.PEND, FBYTE, FLINE, 
+ FSTRG, SBYTE, SSTRG, EXTOP, POSAR, POSRE, LOAD, SAVE 


+ 
io code  cap.b 
beq 
nove.) 
cap.o 
beq.s 
cap.6 
beq.s 
SOVE.W 
gsr 
dc.) 
de.) 
dew 
rts 


serio _ptrs 


+ 

set _abspos tet.! 

bpl.s 

nove, | 
aove,] 
bra.s 

add.} 

move] 
bra.s 

move. b 
bra.s 
fove.b 
acve.l 
Ove 

rts 


use_posn 


set_relpos 


send byte 


fetch_byte 
set_memptr 
ic_ready 


49,00 
vector a2 
mem ptriaQ),as 
#66,d0 
set_abspos 
467,40 
set_relpos 
234, a2 
{a2) 

0 

Q 

0 


di 

wse_posn 

buff _addréad),d! 
dl,a5 
set_eaptr 
di,as 

a5,dl 

set _menptr 

ai, (asd+ 
set_semptr 
(aS)#,d} 
a5,mem_ptr (ad) 
40,00 


Call to FS.EXTOP? 


AS -> NEM address 
Call to FS,POSAB? 


Call to FS.POSRE? 


Use 10.SERI0 vector 
Oo other serial 1/0 
Pointer for 10.PEND 
Painter for 10.FETCH 
Pointer for 10. SEND 
Return from SERID 


Negative parameter? 


Get default base 
Set position 


Offset position 
Return new value 


Reset MEN pointer 


* 


# Code to handle TRAP #2 calis: OPEN and CLOSE 


+ 
open _code 


fame spec 


exit_open 


+ 
do_butfers 


set flag 


+ 
new one 


+ 
no_rooa 


suba.] 
move. 
moye.w 
jst 
bra. 
bra. 
bra. 
dc.w 
de.b 
acum 
dc.w 
dew 
dc.w 


wove] 
moveg 
move. W 
yar 
bea. 
addq.] 
tst.] 
rts 


move.w 
nove.w 
boi.s 
HOVE. 
nove. ] 
lea. 
bsr.s 
beq.s 
lea.] 
moveq 
bra.s 


hove. W 
bmi.s 
addg.w 
ext. 
moyeg 
aoved 
trap 
tst.] 
bne.s 
move. 
mave.w 
lea. 
nove.) 
acye.) 
sub. 
nove.w 
acve.! 
nove.) 
lea.! 
fave] 
lea.} 
nove, | 
Bove.) 
bras 


fove,t 
ber.s 
noveq 
bra.s 


Ho, 27 Wake space on stact: 
ay,a3 43 -> parameters 
290,82 Use TO.WAME vector 
(azh 

exit open 
exit oper 
open_ok 


Nawe faulty 
Parameters faulty 
Nae parsed Dk 
Length of nage 


Has. 3 parameters 
Butter number 

_ buffer size 
Permanent /Teaparar y 


aj,ai 
#40,d1 
192,a2 
(a2) 
do_bufters 
#h, a? 

dQ 


AS -) parameters 

40 bytes needed 

MM, ALCHP vector 
Allocate meaory 

Go on if RAM permits 
Deallocate stack space 
Error code is in DO 


Get buffer 1D 

d7,butt idiati keep buffer ID 

exit open No buffer, exit 
4(a5i buff flag‘ad) Keep P/T flag 
ag,ad Save channel base 
butt _ptr,ad Search buffer List 
scanner Does the buffer exist? 
new one No it doesn’t 
biadi,ad All -» Start of buffer 
#0,d0 OPENed without errors 
set_addr Tell the channel 


ia5),d7 


2tad) dl 
no_size 


Was a Size specified? 
If not, complain! 
Allow for a header 

Di = total buffer size 
Permanent allocation 
NT. ALCHP kew 
Try to allocate sewory 
Did that work? 

If not, complain 

Keep butfer base 
Record buffer ID 
Extend the buffer list 


no_raoe 
a0, d2 

d7, (ai)+ 

buff ptryad 
(al), ladle 

d2, (adi 

$24,d1 

gi, (adit 

ad, butt _addr (a4) 


Start with new bufter 
ignore header bytes 
Store buffer length 
Record butter etart 
ad,mem_ptriasi Initialise pointer 
chan_ptr,ad Extend channel list 
fad), chan_link (ad) 

buff _id(ed) az 
a2,tal) 

ad,al 
exit_open 


no -» Channel block 


a4, al Retrieve channel 
lose _chan 
§-3,00 


exit_open 


No room for the buffer 
Report OUT OF REMORY 


no_size 


+ 
scanner 


found it 
not found 
+ 


clase_code 


lose_chan 
yector al 
+ 

purge list 


bizarre 
+ 


bsr.s 
foveg 
bra.s 


nove.) 
move. ] 
beq.s 

aove.| 
cap. W 

bne.s 
tst.] 

rts 


lea.l 
eal 
bsr.s 
aove.wW 
bmi.s 
subq.a 
beq.s 
Jea.l 
ber. 
bne.s 
aove.] 
subg. ! 
lea.] 
bsr.s 
exg 
moveg 
trap 
move.) 
move. W 
jp 


nove, ] 
move. | 
beq.s 

nove. 
addq.] 
cmp. 1 

bne.s 

move.) 
rts 


end 


lose_chan 
4#-15,d6 
exit_open 


scanner 
do 


butt _idiad), ad 
chan_ptr,ad 
purge list 

(a4) ,d? 
lose_chan 

#1, butt flagiad 
lose_chan 
chan_ptr,ad 
scanner 
lose_chan 

butt addr (adl,ad4 
#8,a4 

buff _ptr,a3 
purge list 
a4,ao 

425, d0 

#1 

a4, al) 

194, a2 


a4, 
purge_list 


}, fa2) 


Size needed but absent 
Report BAD PARAMETER 


Find the ID in D7.W 
Try the next Link 

No such Juck, quit 

AS -> Buffer [DW 

Is it what we want? 
If no, try the next 
Yes, return A2 & Al 
Return DO=0 if absent 


Get list position 
Purge channe! list 


Is a buffer in u 

No, just zap channel 
Is butfer permanent? 
Yes, just zap channel 
Te the buffer busy? 
Search channel list 
If busy keep buffer 
Find buffer 

Include header 

Scan buffer list 
Un-link buffer 

Swap pointers over 
MT. RECHP key 
Deallacate buffer 
Restore channel base 
HM. RECHP vector 
Deallocate channel 


Remove link to (A4) 


No sore - abort! 
AS ~> Buffer ID.W 
Skip buffer 1D 
Have we found it? 
No, look further 
De-list the entry 


REMark Sinclair Qt World HEX LOADER 
REMark by Marcus Jeffery & Simon N Goodwin 


CLS: RESTORE : READ 5s; e: start=RESPR (space) 
PRINT “Loading Hex.. HEX_LOAD start 
INPUT "Save to file. 3#% 

SBYTES f%#,start,byte : STOP 


DEFine FuNction DECIMAL (x) 
RETurn CODE (h$ (x) )-48-7# (h$ (x) >"9") 
END DEFine DECIMAL 


DEFine PROCedure HEX_LOAD(start) 
byte = 0 : checksum = O 
REFeat load_hex_digits 
READ ht 
IF h$="*" > EXIT load_hex digits 
IF LEN(h$) MOD 2 
PRINT"Odd number of hex digits in: “3h 
STOP 
END IF 
FOR b = 1 TO LEN(h$) STEP 2 
hb = DECIMAL (b) =: lb = DECIMAL (b+1) 
IF hb<O OR hb>15 OR 1b<O OR 1b>15S 
PRINT“Illegal hex digit in: "“sh® : STOP 
END IF 
POKE start+byte, 16*hb+lb 
checksum = checksum + 16*hb + lb 
byte = byte + 1 
END FOR b 
END REPeat load_hex_digits 
READ check 
IF check <> checksum 
PRINT"Checksum incorrect. Recheck data.":STOP 
END IF 
PRINT"Checksum correct, data entered at: "“jstart 
END DEFine HEX_LOAD 
REMark Space requirements for the machine code 
DATA 414 


REMark Machine code data 

DATA “41FA006C45FA0092", "20CA45FA008620CA" 
DATA "“45FA007C20CA4SIFA", “OO2Z245FA00S220CA" 
DATA “45FAQ07A2Z0CA4SSFA", "G1 2020CA41FA0008" 
DATA “70204E414E750000" , "0000000000000000" 
DATA "0000000000000000" , "OOOOOGO00000B0SC" 
DATA "0009670001 362A68", "0018B03C0042671C" 
DATA "“BO3SC004367223479", “QOGOGOEA4SE920000" 
DATA “0000000000000000" , “O0004E754A816A04" 
DATA “222800222A41600C", “DBC1220D60061AC1" 
DATA "6002121D214D0018" , "70004E75S5D8F 264F" 
DATA "3479000001 224E92", "6026602460140003" 
DATA “4D454D000003FFFF", "FFFF20SFFFFFO002" 
DATA “50542A4B72283479", "“OO00000C04E926706" 
DATA “SC8SF4A804E753E15", "3147001C46BF23146D" 
DATA “00040026284847FA", “FF5SE6158670841EB" 
DATA “000570006026322D" , "00026B42504148C1" 
DATA “740070184E414A80", "662C240830C747FA" 
DATA "“FF3620D326820441", "001830C0129480022" 
DATA “2948001847FAFF24", "2953001E45EC001C" 
DATA "268A204C609A204C", "614A70FD60926144" 
DATA "70F1608C244B201 2", "67082640BESB66F 4" 
DATA “4A804E7549E8001C", "47FAFEFO41 2ESE14" 
DATA "6B2253680026671C", "47FAFEEO061D46614" 
DATA “28680022518C47FA", "FECE6110C14C7019" 
DATA "4E41204034790000", "“O0C24ED2244B201 2" 
DATA "670A2640548BBR08C" , "66F224934E75", "*" 


omputer users 

struggling with poor 

screen displays can 

suffer from eye- 
strain, headaches and even 
back problems. There are 
three ingredients to poor 
screen displays — dot crawl, 
glare and reflections. While 
there is no universal cure for 
these problems it is rare to find 
all of them occurring at once. It 
is important, though, to identify 
which of the problems is pre- 
sent and then to apply the 
correct solution. Purchasing 
the cure for a problem you do 
not have might increase your 
troubles as well as waste your 
money. 

Dot crawl occurs only on TV 
displays and is acceptable pro- 
vided that the screen is viewed 
from a distance of at least one 
metre, that the computer is not 
used for long periods and that 
high-definition work is not un- 
dertaken. TV displays are 
therefore unsuitable for 
graphics design, desk-top pub- 
lishing and extensive word pro- 
cessing. Dot crawl can be 
minimised by selecting, where 
possible, double width charac- 
ter sizes — at least CSIZE 2,0 
— using the QL eight-colour 
low-resolution mode and by 
avoiding some colour com- 
binations. The only cure for dot 
crawl is to replace the TV set 
with a monitor. 


Glare flare 


Glare is a by-product of poor 
screen contrast, which encour- 
ages users to increase the 
brightness setting until the 
bright parts of the screen dis- 
play “flare”. Glare might be so 
bad that halos round charac- 
ters such as “m”, “n" and “w” 
make them indistinguishable. 
A partial improvement can be 
obtained by locating the moni- 
tor away from any strong light 
source, such as a window, and 
by darkening the room, thus 
allowing the monitor bright- 
ness setting to be reduced. 
Desk lights should be posi- 
tioned slightly behind the moni- 
tor screen and well to one side. 
If those measures are ineffec- 
tive, screen contrast can be 
enhanced greatly by the addi- 
tion of a polarising filter to the 
front of the monitor. 

Polarised sunglasses have 
been available for many years. 
They take advantage of the 
fact that light waves oscillating 
vertically are responsible for 
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Anti Glare Screen 


Mike Lloyd reports on screens 
to reduce computer eyestrain. 


much more glare than light 
waves oscillating horizontally. 
Polarised lenses have a mole- 
cular structure which blocks 
much of the vertical light waves 
and. let through most of the 
horizontal light waves. That is 
why using polarising sunglas- 
ses while lying on your side is 
worse than not wearing them. 

Glare could be reduced by 
wearing non-tinted polarised 
glasses when computing but a 
more practical solution is to 
buy a relatively inexpensive 
polarising filter mounted on a 
firm plastic frame which is 
attached to the front of the 
monitor by means of Velcro 
patches. Not only is the con- 
trast between light and dark 
pixels enhanced but the rich- 
ness of colouring is improved. 

This is particularly notice- 
able with red ink on a black 
background, a combination 
usually unreadable on 
monochromatic screens. Var- 
ious sizes of frame are avail- 
able to suit most makes of 
monitor but polarising filters 
have one big disadvantage — 
their shiny surfaces increase 
the problem of refiections. 

External reflections are the 
biggest single cause of visual 
discomfort when using a com- 
puter monitor. Except by taking 
the extreme step of controlling 
the intensity and position of all 
light sources in the computing 
area, little can be done to 
prevent annoyingly intrusive 
reflections from degrading the 
screen display. 

The Microvitec Cub, one of 
the most popular monitors for 
the QL, is particularly prone to 
reflections. Some monitors 
have a ground glass screen 
which dissipates much of the 
reflected light but this also 
reduces the display contrast 
and so contributes to glare. 

A more recent development 
is the mesh filter, also known 
as the silk screen filter, which 
can be made either of a special 
and very expensive glass or 
from a finely-stretched piece of 
non-reflective nylon mounted 
in a plastic frame. Do-it- 
yourself fanatics might like to 
try stretching an old pair of 


women's tights over their 
monitors. 

Anti-reflection filters work on 
the principle that reflected light 
usually hits the screen at an 
angle. The mesh only allows 
through light which is perpen- 
dicular to the face of the 
screen, thus giving light from 
the monitor an advantage 
while absorbing light from 
external sources. Again, these 
filters are in many sizes to suit 
different monitor designs and 
they are often described, con- 
fusingly, as being anti-glare 
filters. 


Cub filter 


| have been trying a mesh 
filter for the Microvitec Cub 
bought from Inmac, which sup- 
plies by mail order to business 
customers. It costs £30 plus 
VAT and is in a simple protec- 
tive carton. The frame is col- 
oured black on one side and 
light grey on the other so that it 
could complement either the 
QL or the BBC variants of the 
Cub. Included in the package 
are four small Velcro strips 
which are fixed to the monitor 
surround by very strong 
double-sided sticky tape. The 
filter needs to be removed 
occasionally to clean the 
screen. 

The Cub has a distinctly 
curved front and the filter is 
uncompromisingly straight; 
therefore the only attachment 
points were at the top centre 
and bottom centre. The in- 
creased distance between the 
screen and the filter at the 
edges tended to make charac- 
ters look very slightly out of 
focus. The filter does not re- 
move all reflected light be- 
cause the nylon threads of 
which it is made are not com- 
pletely non-reflective. In strong 
light, the diamond grid of the 
nylon weave can clearly be 
seen but the overall effect is 
remarkable. 

A little care is needed to 
keep the filter in good condi- 
tion. Glass and polarising fil- 
ters can be cleaned in the 
same way as screens but 


nylon mesh filters would be 
damaged by sprays and 
cloths. They are cleaned by a 
little roller of double-sided tape 
which picks up pieces of dust. 

All filter types can be bought 
with an anti-static device if 
static electricity is a particular 
problem but for most users 
that is an unnecessary sophis- 
tication. Smokers can soon 
destroy a mesh screen by 
inadvertently touching the 
nylon with a lighted cigarette. 
Clumsy users risk putting their 
fingers through the mesh if 
they point to things on the 
screen. 

People soon become so 
accustomed to the improved 
display that they need to re- 
move the filter occasionally to 
to remind themselves of how 
bad the reflections used to be. 
My company is now buying 80 
mesh filters because every- 
body wants one. 

Prices for filters depend on 
the supplier, the size of the 
monitor, the advertiser's per- 
ceived market and the quantity 
ordered. Polarised filters tend 
to be less than £20, while mesh 
filters cost about £25-35. Glass 
mesh filters are available for 
around £100. Check with your 
supplier for details about costs 
for filters suitable for your 
monitor and ask for advice 
about what kind of filter to 
obtain. 


INFORMATION 
Polarising filters 


Advantages: Improves con- 
trast, enhances colours, 
cheap. 

Disadvantages: Shiny surface 
can cause reflections. 

Target Price: £12-£15 


Nylon mesh filters 


Advantages: Reduces exter- 
nal reflections, some reduction 
in glare. 

Disadvantages: Not very 
robust. Slightly awkward to 
clean. 

Target Price: £25-£35 


Glass screen filters 


Advantages: Removes up to 
99 percent of reflections and 
improves colour contrast. 
Robust. Easy to clean. 
Disadvantages: Expensive 
Target Price: £90-£120. 


4] 


- 


oy AR 


In part two of his series on Archive programming, John Davis looks 
at procedures for copying and opening files and creating dbf files. 


ny program will need proce- 

dures to do the housekeeping 

— copying, opening and clos- 

ing of files. It is sensible there- 

fore to have a suite of proce- 
dures which will do this. Before moving on 
to write these it is necessary to say a little 
about variable names. First it is important 
to remember that the reserved words — 
the commands provided as part of 
Archive — may not be used as variable 
names, even with the suffix ‘$' as a string 
variable. 

Parameters and variables declared as 
‘local’ will be recognised only within the 
procedure to which they apply. They will 
not affect or be affected by global vari- 
ables — those applying to the whole 
program. As an example, go into edit 
mode and write the following procedure: 


proc adder;a 
local b 
letb = 10 
letc = a+ 10 
endproc 


Escape from edit mode and type: 


let a = 100 
let b = 200 
let c = 300 
adder;2 
print a 
print b 

print c 


The results should be 100, 200 and 12 
respectively; the global variables a and b 
are unaffected by the parameter a or the 
local variable b. 

One word of caution is necessary. 
Archive looks for parameters and local 
variables before it looks for global vari- 
ables but it looks for fieldnames before it 
looks for either. So if you have the 
following procedure for helping format 
print files: 


proc 1p;t,p$ 
print tab tip$ 
endproc 


and a global variable p$ which contains 
the value “Jim” and you enter the follow- 


42 


ing command 1p;10, “Fred”, the word 
“Fred” will be sent to the printer in column 
10. If you then open a —dbf file which has 


Listing 1 


A program to create dbf files for 
a hypothetical database with files 
Hao" and My"! 


proc init 
let indl 9999999 
9999999 


9999999 


let ind2 
let ind3 
append 
close 
endproc 
proc maked 
kill prg$+"d"+" dbf" 
create prg$+"d" logical "ad" 
x$ 


endcreate 
init 
endproc 
proc makemain 
kill prg$+" dbf" 
create prg$ 
wdrg$ 
sdr$ 
scdr$ 
budr$ 
files$ 
levels$ 
screens$ 
menus$ 
prints$ 
endcreate 
append 
alter 
endproc 
proc makeo 
kill prg$+"o"+" dbf" 
create prg$+"o" logical "o" 
x 


endcreate 
init 
endproc 
proc makew 
kill prog$+"w"+" dbf" 
create prg$+"w"logical "w" 
etc 
endcreate 
endproc 
proc start 
rem Change name to “make" if 
included in main program during 
development 
input "Programme Name?" ;prg$ 
error makemain 
error maked 
error makeo 
error makew 
endproc 


a field p$ the value of which in the current 
record is “Mary” and once again enter the 
command: 


1p;10,“Jim" 


much to your dismay you will discover that 
the word “Mary” will be sent to the printer. 
Close the file and try again and once more 
“Jim” will appear in print. Finally enter the 
command: 


1 Print tab 10;p$ 


and the word “Fred” will appear at the 
printer; the global variable has been 
unaffected by the parameter with the 
same name. 

This can be very disconcerting; it took 
me several weeks to discover what was 
going wrong when my procedure “ops” 
for opening a number of files always came 
up with an error after opening a particular 
file. Since many of one’s procedures may 
well be general-purpose and likely to be 
used with a number of different __dbf files, 
| believe it to be useful to have a 
convention for ensuring that the two never 
conflict. As a general rule | now reserve 
variable names of one or two characters 
+§ for strings — for parameters and local 
variables and | use names of three 
characters or more for fields and global 
variables. | commend the practice. 

It is inevitable that any program will 
involve copying even If only to make a 
back-up copy of the amended —_dbf at the 
end. To avoid failing with an error any 
previous copy of the file must be deleted 
before the back-up copy is made. The 
following procedure does both: 


proc cop;o$,n$,d1$,d2$ 
kill d2$+n$ 
backup d1$+0$ as d2$+n$ 
endproc 


o$ is the file to be copied, n$ is the new file 
name, d1$ is the source drive and d2$ is 
the drive to which the copy is to be made. 
So the command 
cop;"“myfile”,“myfile”,“mdv1__”,“mdv2 

_—” will copy the file called myfile from 
mdv1 to mdv2 with the same name and 
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: a 


CHIVING 


“cop;“a",“b”,“mdv1i_”,“mdv1_” will 
copy file a as file b on the same drive. 

It is obviously good practice to keep an 
unopened copy of the file on which you 
are working, since a system crash with a 
—«dbf file open may well cost you the 
contents of that file. If you are using 
Microdrives and have both this working 
copy and the security copy on the same 
medium it will be prudent to have yet 
another copy on another medium. 


Ramdisc 


If you have Ramdiscs available it is a 
good idea to keep your screen files on 
Ramdisc to improve response times. 
Provided the files are not too large you 
can also keep the open working copy of 
your __dbf files on Ramdisc as well for the 
same reason. If you have a large memory 
expansion but are still using Microdrives 
you may well have more space on your 
Ramdisc than on any one madv. If you do 
this, remember to close and copy prompt- 
ly as soon as you have done your work as 
data on Ramdisc is very vulnerable; 
copying back to a permanent medium 
every half-hour or so during a work 
session is not a bad idea. Another risk is 
that you could end up with a dbf file on 
the Ramdisc larger than 110K which you 
would be unable to copy to mdv without 
deleting some records. 

As supplied, Archive allows you to 
choose where to keep your system infor- 
mation — the program + printer_dat — 
Help files and data files. The Superbasic 
program config__bas is used to change 
these. 

Although it is not immediately obvious 
in Archive, ‘data’ files do not just mean 
—dbf files; the term also includes _scn, 
—prg and pro files. You may wish to 
keep these on different devices and to be 
able to vary on which device you keep 
particular types of data depending on 
whether you have, for example, Ramdisc 
or on the size of your _dbf file. As a result 
| identified the need for four global 
variables to hold the identities of four 
different devices: 


wdr$— holds the open working dbf files 
sdr$ — holds the security copy of the 
—dbf 

scdr$ — holds the screen files 

budr$ — holds any additional backup 
copy of the __dbf files 
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Also, if these procedures are to be 
general-purpose and available for a varie- 
ty of programs, it is necessary to have a 
variable called prg$ to identify the files 
relating to a given program. Since you 
may wish your programs to be easily 
converted to run on PC Four on an IBM to 
have a variable called join$ which is an 
underscore for the Qdos-based machines 
and a full-stop for IBM PCs. 

Concerning the naming of files, | de- 
cided that: 


a. Programs should have four character 
names. 

b. Working —dbf files which, in a sense 
are ephemeral only, should be given 
single-character names. 

c. Working screen file should have two- 
character names, the first character iden- 
tifying the file to which it relates and the 
second identifying the particular screen. 

d. Working copies of menu screen files 
should have a name resulting from the 
concatenation of “men” and a single 
character. 

e. The main copies of all these should 
have a name concatenated from the 
program name and the working file name. 

So a program called “comm” with four 
—dbf files called “d”,“w”,“o” and “z” for 
each of which there is only one __scn file 
and only one menu has the following files: 


held on sdr$ 
commd__dbf 
commw__dbf 
commo__dbf 
commz_abf 
held on wdr$ 
d__dbf 
w__dbf 
o__dbf 

z__dbf 

held on sdr$ 
commda_scn 
commwa__scn 
commoa__scn 
commza__scn 
commenu__scn 
held on scdr$ 
da_scn 
wa__scn 
oa__scn 
za_scn 
menu__scn 


By using the block copying convention | 
found it possible to concatenate all the 
various —dbf file names together into a 


global variable called files$, all the screen 
names into a variable called screen$ and 
the menu names into a variable called 
menu$. For the foregoing program the 
values of these variables are as follows: 


Files$ dwoz 
Screen$ dawaoaza 
Menu$ rv 


| then do all necessary copying using the 
following procedures: 


proc opcops 

rem makes working copies of _dbf files 

local no 

let no=1 

while no<len(files$)+1 
cop;prg$ + files$(no)+join$+ 
“dbf” files$(no) +join$+ “dbf",s- 
dr$,wadr$ 
let no=no+1 
endwhile 
cstat 

endproc 


proc scrcops 
rem makes working copies of screens 
use “main” 
local po 
let po=1 
while po<len(screens$) +1 
cop:prg$+screens$(po to po+ 1)+ 
join$+ “sen” screens$ 
(po to po+ 1)+join$+“scn",sdr$, 
scdr$ 
let po=po+2 
endwhile 
let po=1 
while po<len(menus$) + 1 
cop;prg$ + “men” +menus§$(po) + 
join$+“scn”,“men” +menus$ 
(po)+ join$+“scen” sdr$,scdr$ 
let po=po+1 
endwhile 
cstat 
endproc 


proc clocops 
rem copies back__dbf files at end of 
session 
stat;“Making Security Copies” 
use “main” 
local n 
let n=1 
while n<len(files$)+ 1 
cop;files$(n)+join$+ “dbf” ,prg$+ 
files$(n) +join$+ “dbf” wdr 
$,sdr$ 
let n=n+1 
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endwhile 
cstat 
endproc 


proc bucops 


rem makes extra copy of dbf files on 
different medium 
stat;‘Making Backup Security Copies” 


if budrS$=sdr$ 
return 
endif 
local n 
letn=1 
while n<len(files$)+ 1 
cop;prg$-+ files$(n)+ join$+ “dbf”, 
prg$+files$(n) +join$+ dbf 
“ sdr$,budr$ 
let n=n+1 
endwhile 
cstat 
endproc 


In the foregoing procedures the proce- 
dure “stat” prints the string given as a 
parameter centre justified on the bottom 
line of the screen — assuming a monitor 
with a screen width of 80 columns in 
reverse video. 


proc stat:p$ 
local t$ 
ink 0: paper 7 
if len (p$)>80 
let t§ = p$(1 to 80) 
else 
let t§ = p$ 
endif 
print at 21,40 — int(len(p$)/2);p$ 
ink 7: paper 0 
endproc 


The following procedure clears this 
‘status line’ by printing a line of 80 spaces 
— white ink on black paper — over the 
message displayed by “stat”: 


proc cstat 
print at 21,0;rept(“ “,80) 
endproc 
Those filenames above ‘“com- 


ma_abf”, “a__dbf” and so on are not the 
only names files have; each open —dbf 
file must have a logical filename (Ifn). If no 
files are open already with the Ifn “main” 
and a file is opened without any Ifn, 
Archive will allocate it automatically the 
name “main”; otherwise it is up to the 
programmer. 

When a number of files are opened the 
last one will be the ‘current’ file — the file 
used by a number of commands unless, in 
some cases, another is specified. The 
current file can be changed by the com- 
mand “use lfn”. If “a” is the current file and 
you wish to Search, Find, Locate or Insert 
— all commands which can be executed 
only on the current file — on “b":- 


use it? 


44 


will achieve what you want. The following 
commands can be executed on a file 
other than the current file if an fn is added, 
e.g., Append “b” will add a record to the 
file with the Ifn “b” whatever is the current 
file): 

all. . . endall: fastest possible scan but 
must be used with care if records are to be 
altered. 

append: adds a record to the current or 
specified while with the current values of 
the field variables; i.e., it ‘clones’ the 
current record of that file. 
back: moves back one record. 
delete: deletes the current record of the 
current or specified file. 
first: makes the first record of the file the 
current record. 
last: makes the the last record the current 
record. 
next: makes the next record the current 
record. 


When assigning values to variables — 
i.e., let — Ifns are used thus: 


let b.initials$ = a. initials$ 
or (if “a” is the current file) 
let b.initials$ = initials$ 


A series of such assignments need then 
to be followed by: 


update “b” (which will amend the current 
record in “b”), or 

append “b” (which will add a new record 
to “b") 


unless the values assigned to the fields in 
lfn “b” are required to be held there only 
temporarily since otherwise they will be 
lost on moving to another record in Ifn “b” 
or on closing the file. An assignment of a 
value to a field merely changes the 
current value of that field without perma- 
nently affecting the —dbf file. 

| decided that, in my scheme of file- 
names, files should have the same lfn as 
their filename which will invariably consist 
of a single letter. | made provision for the 
opening of a “main” file for each program 
which must have a name of more than one 
character. Having decided this, files can 
be opened by the following two proce- 
dures: 


proc op;f$ 
if len(f$)>1 
open f$ 


else 
open main.wdr$+f$ logical f$ 
endif 

endproc 


proc ops 

local no 

let no=1 

while no<len(main.files$) +1 
op;main.files$(no) 
let no=no+1 
endwhile 

endproc 


It will be noted that these two proce- 
dures refer to main.files$ and main.wdr$. 
This is because | decided to provide each 
program with a “main” __dbf containing 
the following program variables: 


wdr$ 

sdr$ 

scdr$ 

budr$ 

files$ 

screens$ 

menus$ 

levels$) The significance of these two 
variables 

prints$) will be explained later. 


| will also be explaining the creation of 
this —dbf file and others later. The reason 
the procedures refer to main.wdr$ and 
main.files$ rather than just wdr$ and 
files$ is because once a file has been 
opened it becomes the current file and so 
displaces Ifn “main” from this position. 
Without this full variable description ops 
and op would look to the most recently- 
opened file for wdr$ and files$ and, if it did 
not contain such fields, global variables 
would be sought. 


Listings 


Until now | have embodied individual 
listings in the text but from now they will be 
appended as a listing. In the next part | will 
explain how listings may be obtained. 
Suffice it to say at this stage that all 
procedures start with the word “proc” at 
the margin and all other lines are inde- 
nted. Thus if any lines, other than “proc” 
lines, in the printed listing appear to start 
at the margin they are the continuation of 
the previous line. Also hyphens at the end 
of the previous line of which they are the 
continuation are not part of the listing. 

A__dbf file can be created by aseries of 

direct commands: 


create “filename” or, if another file is open 
create “filename” logical “Ifn” 


followed by the names of the fields in the 
order in which you wish to access them. 
When all fields have been entered, enter 
‘endcreate”. 

If you discover on debugging that you 
have made a mistake or you wish to add a 
field or change their sequence, you have 
no choice but to ‘kill’ the file and type it all 
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again with the attendant risk of error. As a 
result | prefer to make a program which 
creates the database for each program. 
Listing one is of my program “make- 
comm” will create the database for the 
program “comm”, 

So far as makemain is concerned this 
will create a file and allow the initial values 
of the system information to be entered. 
The complete database can be created by 
entering ‘start’. 

Individual dbf files can be created by 
calling the specific procedure, e.g., if you 
enter ‘maked' the __dbf prg$+“d” will be 
regenerated. The procedure init adds a 
single record to each file, empty except. 
that the fields ind1, ind2 and ind3 are set 
to a high value. The reason will become 
clear in the next part. 

lf in program development it proves 
necessary to change a particular —dbf 
file: 


a. Close the file concerned 


QL SUPERTOOLKIT Il by Tony Tebby 


b. Save the program you are working on 

c. Load the “make” program related to 
that program 

d. Edit the “make” procedure for the file 
e.g., for file “a” — makea. 

e. Save the “make” program 

f. Execute it by typing “start >Enter<” 

g. Reload the program on which you were 
working. 

This will replace the file concerned but 
will, of course, destroy any data in that file 
so is acceptable only during development 
before the program has been used. With 
the next part | will be publishing a listing of 
my program “reorgdb” which allows fields 
to be added to or deleted from —_dbf files 
or the order of fields changed without 
losing the data. 

Since init, makemain and start will 
always be the same in any of these 
database creation programs it is worth 
saving these procedures as the program- 
me “makegen”, replacing the other three 
“make” procedures with: 


‘rem Insert procs to make database files 
e.g. error makea 


An alternative procedure would be to 
include, during development, init, the 
make procedures and the make prog- 
ram's “start” procedure — renamed as 
“make” — in the program being develo- 
ped. This would simplify the recreation of 
—dbf files during development. At the end 
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the two separate programs could be 
separated out by the following pro- 
cedure:- 


a. Save the program as finally edited 
under its program name, e.g., “comm” 
b. Delete all procedures except init and 
those beginning with “make” 

c. Save as “make. .. ."(the. . . . repre- 
senting the program name, e.g., “make 
comm”.) 

d. Reload the original program 

e. Delete init and all procedures begin- 
ning with “make” 

f. Save again under the program name 
(e.g., “make”). 


Database files once created will be 
“open”. While open they are at risk and if 
the computer power is interrupted they 
may be corrupted. At the end of a session 
they may be closed individually by the 
command “Close” repeated for every 
open file. Alternatively the Command 
“Quit” which finishes the Archive session 
closes all open files, as does “New” which 
clears the present program, while leaving 
Archive still running. In the next part | will 
include a procedure which closes all open 
files without losing either Archive or the 
resident program. 

In part three | will deal with the block 
closing, sorting and reorganisation of 
database files and general purpose 
“start” and “end” procedure. 


THE ULTIMATE QL ENHANCEMENT 


QPAC Ill new from the house of QJump, a totally new version of 
ORAM and OPAC. Available June 89. 
Please phone for further details. 


Over 118 Commands:— Full Screen Editor, Key Define Print Using, 
Last Line Recall, Altkey, Job Control, File Handling, Default Director- 


ias, Extended Network. OFLP (Micro/P disc interface upgrade) ... seven GE 14.950 
16k Eprom Cartridge Version 2.2... .@£ 24.15d OMONIIMicrodrive ns Seasasieeecieiualtciae sac @E 19.95d 
Configurable Version on Microdrive @£ 23.00d QMED (Medic disc interface upgrade) ................- --.@E 14.95d 
OPTR Pointer interface mV/drive ..-..--.----s.-ecsssees @€ 34.50d 

QPTR Pointer Interface + 3.5" disc ...... ei 29.000 

MIRACLE SYSTEMS PRODUCTS OTYP Type/Spell Checker oe ceeeeeeeeessresineersveent@'€ 29.900 


OL Expanderam Ok board, fit your own drams. Offer open only while 


STOCKS LAST 0.2... eee teee tees 
QL Trump Card 768k (Toolkit Ii 
QL Trump Card 512k (Toolkit Il etc) 


| QOL Trump Card 256k {Toolkit Il etc) if : 
QLExpanderam 512k Thru Card wadsfika i 
QL Expanderam 256k Thru Card ..... . 
Orams to suit above 41256/15 justitivesssicia sitasaasetes 
QLModem ivezai : sapttes 
QL Centronics Printer Interface yee eeesseeeereeee 


.£ 23,00d 
£259,906 ZITASOFT SOFTWARE by Steve Jones 
- @£213.90b 
- @£149,50b LOCKSMITHE copies M/DRIVE — M/DRIVE ...... .... @£E 11,50 
£133.40b 4MATTER + LOCKSMITH copies M/DRIVE — DISC (@£ 23.00 
(@£ 80.50b SHRIVEL memory shrink prog user definable ie 128k or 192k or 256k 
RR FENOGES GING ccs peter enesen cestaeeaii chansipniy ies ROOT eSeiMn tapas aesaute @E 6,90¢ 
. &£ 48.30d =TOOLCHEST utilities to allow the creation of customised madv doctor 
» @E 23,75d pron... Ameer Riteata siete binenabian tbasis .- @E 11.50 
@E 37.95d 


800 ST ALBANS ROAD, 
GARSTON, WATFORD, 
HERTS. WD2-6NL. 
Tel: 0923-672102 


OL Modapter 


QL HARDWARE 


Single 3.5" Disc Drive & (Own PSU} @E£ 97.75a 
Dual 3,5" Disc Drive & (Own PSU} = syocseeeeeeey ee VE 188-608 
Q POWER REG, The only real solution to your QL overheating 

crriecccucctnnen GEE, 2a00G 
@eé 11.50d 


NEW SIDEWINDER print screens or parts of screens from postage 
stamp size to large banners, print sideways, invert, scale and now 
comes with colour driver for LC10 of JXB0C and accepts desk top 
publishing files, multiple labeling also included. New printer config 
supports a large range of printers, even 24pin. 

Upgrade to new Sidewinder 


(switched mode power supply run cold) 


QL Keyboard Membrane £ 6.90c 


SEL: 


OEP Hil Advanced Eprom Programmer .........6..000--- @£121.90d New Sidewinder ....... ... £ 23.00 
Care Eprom Cartridges each 3 -@E §.75¢ 
Eprom 27128 250n/s 16k @£ 5.75c¢ 
ULA CHip ZX8301 @£ 15,64c 


— 


Microdrives {each) ............, iin exxesiaonscenreansdne OPE 


aera ctnelai he esa MONITORS (Price including lead) 
1.9Be 


3.5" (each) dis disc 0.0.0... siinseiioanes cee @E 1,61c Philips BM7502 Green Hi-Res ... -. GE 89.93a 
3.5" {10 of) d/sdiscs _..... ... @£ 13.80¢ Philips CM8833 Colour Med-Res sire @E271.41a 
Philips AV7300 TVAuner for above ......-. ... @E $9,00b 


THE OQ CONTROL BOARD 


As specified in the Colin Opple Connextions Series — Please call for 

details .........  hiniiiyiSacas a SERA ISA Cae te Tt @£ 89.95d READYMADE LEADS 

Analogue/detail chip —........ @E£ 2691c 

Cross Assembler 8048 or 650: GE 1B40C RGB OLtOPHONO ceeoseee-cesoeseee-- . @E 5.75¢ 
‘RGB 8-6 pin DIN @E 7.13¢’ 


RGB 87 pin DIN (Hitachi ... 
RGB 8-7 pin DIN (Ferguson) 
RGB 8 pinto SCART (Euro} -.....-.. 


@E£ 7.13c 
.. @£ 7.13¢ 
wees GE 17,500 
snes GE 9.B9t 


HOW TO ORDER: ALL PRICES INCLUDE VAT 


Please add carriage 
a=£1150 b=3.45 
c=£1.38 d=£2.30 


6-way PCC 25way ‘D' (Printer-Ser 1} eae ae 


i By Post, Enclose your Cheque/PO made payable to CARE Electronics. 
\; Or use ACCESS/VISA, Atlow 7 days for delivery 
F 
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onnections between real-life 

screen and the pixel world of 

computer programs are often 

links by analogy. Thus an icon 
display becomes a desk-top and a collec- 
tion of bytes on a storage device becomes 
a file. A collection of useful utilities is a 
toolkit and a temporary work space is a 
scratchpad. Such powerful imagery helps 
computer users understand what is hap- 
pening among the chips. 

One image which needs to be impress- 
ed on all programmers for the benefit of all 
computer users is that the menus of a 
computer program are its knobs, levers, 
switches and dials. This was brought 
home to me recently while | was testing a 
word processing package. It had all the 
mod cons of spelling checker, WYSIWYG 
drawing facilities and comprehensive 
printer control. All its functions, however, 
were buried deep in a gigantic menu 
hierarchy so that even deleting a charac- 
ter needed five keypresses. Somewhere 
among the sophistication and complexity 
of the program the user’s needs had been 
forgotten. 


Corkscrews 
and plugs 


As one software engineer put it, “Cork- 
screws and electric plugs are easy to use 
only because a designer has taken the 
trouble to make them so; programmers 
seem so engrossed with making prog- 
rams work that they forget to make them 
also easy to use.” 

Even on simple programs like the QL- 
Calculator project it is important to make 
users feel at home as soon as possible. 
User confidence can be built by making 
program control logical and familiar, often 
by emulating standards set by other 
software. Confidence is maintained by 
meticulous attention to error-trapping, by 
applying consistency in the choice of 
control keys, by giving users an escape 
route before committing them to any 
irrevocable act, and so on. 
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In the final summing-up 
of the Calculator project, 
Mike Lloyd adds menu 
control for a polished 
finish. 


Listing 4.1 


4108 DEFine FROCedure Store_Menu 
4105 LOCal x, k 
= 1 7T0 S: Show Menu x, Stored(x) 
Pa eee = 
= Fetchkey (Fkey#) 
i ae 
Stores(k) = To_Dect® (In Base, Num) 
Show Menu k, Stores (k) 
Flag "FF" & ks PAUSE S@ 
4150 END IF 
4155 END DEFine Store_Menu 


Listing 4.2 


4200 DEFine FPROCedure Flag (Text #) 
4205 Calc _Wndo: AT 8, 11: Hue 2: PRINT Text; 
4210 END DEFine Flag 


Listing 4.3 


4200 DEFine FROCedure Fetch Menu 
4305 LOCal x, Key 
4315 FOR x = 1 70 & 
4320 IF ABS (Store#(x)) In_Base"8 
a] Show Menu x, Stores (x) 

ELSE 

Show Menu x, " # * #"s Fkey#(x +1) = "pp" 
: END IF 

37 END FOR 
4340 Flag "<-" 
4345 Key = Fetchkey (Fkey$) 
4350 IF Key 
4355 Num = From Dec#(In_Base, Stores (Key) ) 
4560 Flag "F" & Key 
4365 END IF 
4270 END DEFine Fetch_Menu 
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Readers who have followed the de- 
velopment of the QL-Calculator program Listing 4.4 
will know that error-trapping has been 
achieved in part by specifying a string of 440@ DEFine PROCedure Constant_Menu 
valid keypresses and responding only to 4405 LOCal «x, Key, Number (5), Temp$(1@) 
them. When sub-menus are displayed the 4415 FOR x = 170.5 
range of valid keys is reduced to six, the 4420 IF ABS (Const#(x)) < In Base*s 
five function keys and the escape key, 4425 ° Sumber (c) nats Ge) e 
which provides a “hidden option” in each ee Bs speaks € 


menu. Knowing that the Fetchkey func- 4430 Temp$ = Const# (x, " " INSTR Const#(x) +1 TO) 
tion, published earlier, will respond only to 4435 Show Menu x, Temps 
those keys makes further error-trapping in aan? ELSE , : 
this month’s modules much more straight- 4445 Show Menu x, " # # #"2 Fkey$ (x +1) = "2" 
forward. 4450 END IF 
4455 END FOR x 
446@ Flag "<-" 
Using the 4465 key * Fetchkey (Fkey#) 
function keys oe Sor oe 
448a Num = From_Dec#(In_Base, Number (Key) ) 


se 4485 Flag ‘F’ & Key 

Although designing a menu structure 449@ END IF 
using only the functionkeysWwouldimpese 1 4495 END DEFine Constant _Menu 
severe restrictions on a large program itis = 
an ideal way to maintain menu consisten- 
cy in a small program. Three of the sub- 


menus are connected with data storage Listing 4.5 
and retrieval; the fourth controls system 450@ DEFine FROCedure Set_Menu 
options and the fifth allows the program to 4502 LOCal «x, Loop, Key 
be exited. 4506 REPeat Loop 
pein 2) Sones ne See Oe) 4508 = 43=Show_Menu 1, "IN = " & Base (In_Val) 
eS ey ee eee) 4510 © Show Menu 2, “OUT = "" & Base$ (Qut_Val) 
ine. The menu displays any values which 4512 St M 3. PRT = “ : a 
have been saved previously so that the te RRM ae Ot ha Mie = ¢Prts (PrtOn +1) 
user can avoid over-writing them acciden- 4514 Show Menu 4, “MODE= &% Modes (IntOnly +1) 
tally. A prominent arrow pointing from the 4516 Show Menu 5, "RETURN" 
input line towards the menu area indi- 4519 Key = Fetchkey (Fkey$) 
cates the direction of traffic. A user 4520 SELect ON Key 
presses a function key to store the input 4522 oo S: EXIT Loop 
line value. If he changes his mind after 4524 is In_Val = 1 +In_Val MOD 4 
selecting this sub-menu he can press the 4526 2: Out_Val = 1 4+Out_Val MOD 4 
escape key to return to the main input 4528 SZ: Set Printer ba 
mode. 453 4: IF IntOnly 
45s2 IntOnty = 
45.24 EESE 
All values 4536 IF In Val = 1 AND Out_Val = 
in decimal 45:38 IntOnly 1 
454@ ELSE 
The QL-Calculator stores all values in 4542 Warning 
decimal, no matter what the input or 4544 END IF 
output base might be, hence the call to the 4S4S END IF 
conversion routine at line 4135. When a 4548 END SELect 
value is saved the menu display is 4550 IF In_Val > 1 OR Out_Val > 1: IntOnly = 1 
updated and the function key pressed is 4552 In_Base = CODE (BaseVal® (In_Val)) 
displayed momentarily near to the input 4554 Out Base = CODE (BaseVal® (Out_Val)) 
line. 45546 END REPeat Loop 


The “flag” routine at listing 4.2 displays 4555 
arrows fae function key names next to the Se END DE Se eee 
input line. This short procedure saves five 
repetitions of the code it contains. The 
next listing is the opposite of the first, Listing 4.6 
retrieving values which have been saved 
previously. Once again users benefit from 4600 DEFine PROCedure Set_Printer 
an informative sub-menu display showing 4605 IF FPrtOn 
the values which have been saved. The 4610 PRINT#5; CHR#(7): CLOSE#S 
arrow now points from the menu towards 4612 PrtOn = 8 
the input line but the basic principle of eas 
i in a result 
Cee ie conn. hey, P onlay a 4620 OPEN#S, seri: PRINT#5; CHRS(7); 
For obvious reasons values which are 4625 PrtOn 
too great to be displayed in the current 4620 END IF 
input base cannot be selected. They are 4635 END DEFine 
replaced in the menu display by a line of 


4615 ELSE 
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asterisks and the appropriate menu key 
value in the Valid$ string is replaced by a 
question-mark, making it unselectable, to 
preserve the integrity of the error-trapping 
system. 

Listing 4.4 is very similar to its prede- 
cessor, except that it uses values stored 
in the “constants” array. Unusually, they 
are stored together with their labels in a 
single character array. Coercion is used 
to extract the values, while the INSTR 
function is used to strip out the textual 
descriptions. As previously, values too 
great for the current input base are 
suppressed. 

The third sub-menu is used to set what 
might be termed the program “system 
variables”, The most immediately useful 
are those controlling the input and output 
bases. Pressing either F1 or F2 cycles 
round the available options until the 
desired ones are reached. This is an 
unwieldly way of presenting a large 
number of options but it is manageable 
here. 


Integers or 
real numbers 


Values represented in binary, octal or 
hexidecimal are always integers, while 
decimal values can also be real num- 
bers. Users can toggle between integer 
and real number input by pressing F3. 

The F4 key toggles the printer option on 
and off using the controlling code con- 
tained in the next procedure definition. 
The FS key, which otherwise would be 
redundant, is linked to the ESC key to give 
an overt means of leaving this menu when 
all choices are complete. In this program 
users can make many selections in this 
sub-menu before opting to return to the 
main input mode. 

After each keypress the module must 
update the menu display and check 
whether it must force the QL-Calculator 
into integer mode because a non-decimal 
base has been chosen. Similarly, it must 
prevent the user selecting the real num- 
ber mode when a non-decimal base is 
present. This has been achieved by 
reprinting the menu after every keystroke, 
a cumbersome solution but one requiring 
very little code. 


Nest structures 
and quit 


Listing 4.6 opens or closes a channel to 
the printer via the ser? interface and uses 
Epson control codes to make the printer 
beep an acknowledgement. The variable 
“PrtOn”, which is set or re-set here, is 
referred to elsewhere in the program to 
determine whether or not hard copy is 
required. 

The Quit sub-menu is unusual in that is 
is programmed as a function which re- 
turns a value to the main input mode. This 


48 


Listing 4.7 


47%@ 
4705 
4A7iS 
4720 
4725 
47 30 
4735 
4740 
4745 


DEFine FuNction 
LOCal x, Loop, 
Show Menu 1, 
FOR x = 3, 4, SG: 
Key = Fetchkey 
TF key = 1: RETurn 
RETurn @ 

END REFeat Loop 


Key 


Listing 4.8 


li Out a i um * 
Show Menu », ” 
(Fkey) 


Gui t_ Meru 


Show Menu 2, "Resume" 


1 


END DEFine Guit Menu 


4800 DEFine FROCedure Quit Calc 


4805 FrtOut 
48i1@ IF PrtOn: 
49815 END DEFine Ouit Cale 


CLOSE#S 


arrangement is for the benefit of the 
purists who like to ensure that all nested 
structures are exited properly prior to 
quitting a program. Just two options are 
displayed, allowing users to confirm the 
decision to quit or to resume using the 
calculator. If the exit option is confirmed 
the final listing, 4.8, tidies by printing an 
explanatory message and closing the 
printer channel. 

Utilities such as QL-Calculator are 
most useful, as executable jobs can be 
multi-tasked. This can be achieved only 
by machine code programs or ones which 
have been compiled with one of the many 
proprietary compilers available for the QL. 
The following comments are based on the 
Digital Precision Turbo compiler, the most 
powerful but also the most demanding 
compiler on the market. 

By compiling the QL-Calculator it can 
be loaded much faster; it can have non- 
destructive windows which return the 
screen display to exactly what it was 
before the program was accessed; its 
error-trapping can be much improved and 
more significant digits can be displayed. 

The compiled version is likely to be 
larger in size; routines to turn the program 
on and to suspend SuperBasic would 
need to be added, and the increase in 
speed for which compilers are noted 
would largely be wasted on such an 
interactive program. , 

Although QL-Calculator will compile 
with Turbo with little difficulty, some re- 
writing is necessary to take full advantage 
of the facilities the compiler offers. The 
compiled program needs no_ special 
window-handling or hotkey arrangements 
if Qram is used because it can be 
accessed and removed by pressing 
CTRL-C. In the absence of Qram, proce- 
dures similar to those included with Turbo 
will need to be incorporated to restore 
screen displays and turn the calculator on 
and off. 


"% END CALC" 


The SuperBasic version of the program 
cannot detect whether it has been suc- 
cessful in opening a channel to the printer. 
The printer might be busy or the channel 
might be allocated for another purpose. 
The Turbo toolkit includes anew keyword, 
Device__siatus, which can detect such 
problems before they cause a crash. 


How to hold 
the digits 


The Turbo nine-digit precision is a 
different matter, because it affects the QL- 
Calculator conversion routines adversely. 
A simple cure is to re-write these routines 
so that they do not depend on the 
presence of the “E” symbol to trigger 
overflow action. The additional digits by 
extending the calculator display area, 
increasing the size of appropriate strings 
by two character spaces and amending 
the code accordingly. These changes 
affect a few modules in the program and 
should be undertaken with great care, 
keeping an unmodified version of the 
program in a safe place until the changes 
have been tested. 

The easiest way of obtaining a com- 
piled version of QL-Calculator is to order 
one from Microdrive Exchange when it 
appears there. The program has been 
partly re-written and extended to include a 
larger variety of useful constants, more 
menu options and a useful ASCII code 
display. 


@ The next issue of SuperBasic answers 
many of your queries about technical 
aspecis of SuperBasic. If you have found 
a problem with SuperBasic programming, 
or you would like to share a programming 
tip, write to Mike Lloyd, Sinclair QL World, 
Focus Magazines Ltd, Greencoat House, 
Francis Street, London SW1 1DG. 
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as possible and in the correct 
colour order. 


PR 0-G'S 


If you have a program worthy of consideration, send it to ‘The Progs’, 
Sinclair QL World, Greencoat House, Francis Street, London SW1P 1DG. 
We pay for everything published at the usual page rates. 


Program of the month 
CUBE by Dirk de Mal 


ube is the game in The game is very simple to 
which you unscram- play. There are five levels of 
ble the coloursinthe — difficulty from 1 (difficult) to 5 
cube in as few turns = (easy). 
The rest is self-explanatory. 


10 MODE 8:CLS#1 

20 BORDER @O:WINDOW 450, 220,25,15:FA 

PER#2, 0: CLS#2 

30 PAPER @:CLS:CLS#Q: screen 

40 inktitwassinstructs TIME:number 

5@ jumble 

60 DEFine FROCedure screen 

7@ BORDER @:CSIZE @,@:AT 15,5:FRINT 
" november 1987 DIRE DE MAL." 

8@ al=Ll:a2=6: al=2:b1=1:b2=6:b3=2:¢c1 

=1lic2=6:c3=2: pva=blipvb=b2:pvc=b3:rp 

VO=a2:pve=b2: pvf=c2 

90 BORDER @ 

10@ CSIZE 3,1:FOR R=1 TO 8@:CURSOR 

19@,R: INK RND(1 TO 1@@):PRINT "CUBE 

“NEXT Ribeginrbegin:CLS:UNDER 1:AT 
@, 11s INK S:PRINT "CUBE" :UNDER @:nu 

mber 

110 OPEN#3, scr _SOx40a150.5 

120 OPEN#4, Scr _S@:40a20 

132 OPEN#5S, scr _ SOx 40a254%50 

140 OREN#6, scr _50x40a150x92 

150 OPEN#7, scr_ SOx 4@a202x 

160 OPEN#S, Scr _ 50x 4@a254x 92 

170 OPEN#9, scr _50»x40a150x 1354 

180 OPEN#10,s5cr 50x 40a202x 134 

19Q@ OFEN#11,scr_50.4@a254_ 124 

200 END DEFine 

210 DEFine FPROCedure jumble 

icheck 

Z END DEFine 

240 DEFine PROCedure inkt 

250 FAPER#S, al: FAPER#4, bi :PAFER#S, c 


260 PAPER#6, a2: FAPER#7 ,b2: FAPERHS, c 


270 FAPER#9, at: PAPER#10,b3:FAFER#I1 


280 END DEFine 

290 DEFine FPROCedure was 

300 CLS#2:CLS#4: CLS#5: CLS#6:CLS#7:C 
LS#8: CLS#9:CLS#10:CLS#11 

310 END DEFine 

320 DEFine PROCedure lLooka 
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33@ LET bi=aizsinktipann 4:a1=cizink 
trpann 3:LET cl=pvariinkt:pann SS: var 
340 END DEFine 

350 DEFine FROCedure lookb 

360 LET b2=a2sinktipann 7ra2=c2rink 
tepann S6:LET c2=pvbrinktipann Gi var 
370 END DEFine 

380 DEFine PROCedure lLookc 

390 LET bi=aSzinktipann 10: a3=c3rin 
ktspann 93sLET ¢cS3=pvcesinktspann tLitiv 
ar 

400 END DEFine 

410 DEFine PROCedure lookd 

420 LET falsinktrscrol S6:al=atrin 
kthiserol S:LeEY adeapvdrinkt:serot 9: 


var 

43@ END DEFine 

440 DEFine PROCedure Looke 

450 LET b2=bil:inktiserol 7:bil=b3:in 
ktescrol 4:LET bS=pvesinktiscrol 10 
ivar 

460 END DEFine 

470 DEFine PROCedure lookf 

480 LET c2eclrinkt:scrol Ssct=c3:in 
ktsscrol S:LlET ci=pvfsinkt:iscrol it 
svar 

490 END DEFine 

S00 DEFine PROCedure var 

S10 pva=blipvb=62: pvd=a2:pve=be: pve 
=b3:ipvf=c2 

S20 END DEFine 

S30 DEFine PROCedure TIME 

540 CSIZE O,@:AT 17,@: INE @:PRENT F 
ILLo¢" “, 50): INE Gs AT 18,9: PRINT “1 
=HARD S=EASY":AT 17,@: INE Si: F RINT 
“Which level are you going to play’ 
rrecheck 

5@ END DEFine 


> 


5 

560 DEFine FROCedure recheck 
S70 a=CODE (INEFEY$(—-1)) 

S80 KEPeat loop 


S9@ SEl.ect ON a 

600 =49:F=8 

61@ =S@:k=9 

620 =Si:k=10 

630 =S2sk=1S 

tk 

650 =REMAINDER :neqsounc: recheck 

669 END SElLect 

670 CSIZE @,@0:AT 18,9:FRINT FILL SC" 
o Un) 


688 Ye@reaprintzmixsintorbeurt 
S90 END DEFings 
YOO PEFine FPROCedure beurt 
7t@ CSTZE B,@:AT 17, @:FPRINT FILLS(" 
",30):AF 17,4: INE 2:PRINT "You sti 
jt have "sks" turns.” 
PSQ LET mek--4 
FMA Kin 
P40 check 
75@ (F m=-1 THEN INE 6:CLS:CSIZE 3, 
L:AT 4,7:FP RINT "YOU FAILED!!! "sblow 
upzwroang 
752 jumble 
770 END DEFine 
*B@ DEFine FROCedure check 
79@ IF al=1 AND av=6& AND aSte2 AND b 
1=1 BND be=6 AND b3=2 AND ct=1 AND 
e2=6 GND c3a=2 THEN victory:GO TO 108 
70 
B00 END DEFine 
810 DEFine PROCedure victory 
820 RESTORE Fea 
B30 READ 
840 TF ue@ THEN RE Turn 
HSM READ D 
86@ HEEF 7OOM*eD, 
870 PAUSE 3 
G80 IF BEEFING THEN GO To fea 
890 GO TO 82a 
908 DATA 104,1,104,1,91,1,109,1.5,1 
04,.5,91,1,81,1,81,1,76,1,81,1,.5,91 
y+, 109,1,91,1,104,1,109,1,104,1 
910 DATA 104,.5,91,.5,81,.5,76,.5,6 
3, 1,65,1,65,1,65,1.5,76,.5,81,1, 76, 
1, 76,1,76,1,75,1.5,81, .5,91,1 
920 DATA 81,1,76,.5,41,.5,91,.5,104 
ye GL,1.5,76,.5,66,1,58,.5,75,.5,8 
1,1,971,1,104,2,104,.5,104,.5,a 
920 END DEFine 
94@ DEFine PROCedure mix 
950 CSIZE O,O: INK S:AT 17,@:PRINT F 
TLOS ¢" ",SQ):AT 17,1@:FPRINT "Now ju 
mbling." 
960 FOR R=1i TO 2@ 
970 t=RND(1 TO 5) 
780 I[F t=1 THEN looka 
990 IF t=2 THEN Llookb 
1@0@ IF t THEN Looke 
WIM TF t=4 THEN lLookd 
1020 IF t=5 THEN luoke 
1020 IF t=6 THEN Lookt 
1940 NEXT FR 
19@5@ END DEFine 
1060 DEFine FROCedure wrong 
1070 CSIZE O,@:AT 18, 2:AT 18,3: INK 
erPRINT "Do you want to try again? 
(y/n)" 
1080 a=CODE (INKFEY$(-1)) 
1090 Y=2 
1100 REFeat loop 
111@ SELect ON a 
1420 =89: sprints RUN 
1150 =7S8rsprintireinde 
11490 =121:isprint:RUN 
115@ =110:sprint:einde 
116@ =REMAINDER :negsound: wrong 
1170 DEFine FROfedure einde 
1180 INE 4; BORDER @: CLS: CLS#@:CSIZE 
SyilvAT S,9:FRINT “BYE!!! "9: FOR ax} 
TO 4:beginz:NEXT a:CLS: STOP 
1190 END DEFine 
1200 DEFine FROCedure begin 
1210 RESTORE 1300 
12270 FOR I=1 TO 54 
238 READ N,D 
2740 IF D=1.% THEN D=1.7 
1250 FAUSE .5 
126@ REEF 3000*D,N 
127@ IF BEEFING THEN GO TO 1270 
128@ BORDER D,RND‘(6) 


1290 NEXT I 

1300 DATA 51,145,595, .5,51, 4.3,111,1. 

Sy lll, 1.3, 71, «eS, 82, oS, 87,09, 71, 25,5 
i, .5, 55,5, 51, 65,38, .5,44,.9,51,-5 

1310 DATA 44,1.3,99,1.3,99,1.3,99,. 

Syl 41 5 55 12552 Sy 99 5085. 7b 5:8 35/65 S57 

1,1.3,62,.5,55,.9 

1320 DATA 51,.5,55,.5,62,.5,71,.5,4 

Zy ody 71 yey G2,. 5,87, -5,82,-5,87,.5, 

OF 5 og lll vats Lil, 25, 121,65, 1453,.55 1 

49,.5 

12330 DATA 133,.5,111,.5,121, .5,99,. 

5 121,425,087 5.25, 99 05,82, «Sy G%y l235.1 
11,1.3,111,1.5,0 

1340 HORDER O 

1250 END DEFine 

1360 DEFine PROCedure number 

1370 INK 6:CSIZE 1,@:CURSOR 95,42:F 

RINT 1 

1380 CURSOR 95,86:1PRINT 2 

1390 CURSOR 95,128:PRINT 3 

1400 CURSOR 135,20: FRINT 4: CURSOR 1 

87, 20:PRINT S:CURSOR 237, 2@:PRINT 6 
1410 END DEFine 

1420 DEFine FROCedure instruct 

1430 AT 17,@:PRINT FILL#(" ",50):AT 
17,@:FRINT "This i8 how the cube m 

ust be":PAUSE 200 

1440 END DEF ine 

1450 DEFine FROCedure pann (x) 

146@ FOR a=1 TO 10: PAN#%,6:NEXT a 
147@ END DEFine 

1480 DEFine FROCedure scroll (x) 

1492 FOR a=1 TO 1@:SCROLL.#s,4:NEXT 

a 
15@@ END DEFine 

1510 DEFine FPROCedure sprint 

1520 INK RND(1 TO 6): 

1530 IF Y=@0: BEEF 100,1:CfSIZE 0,@:AT 
17, 35:FRINT -CHRS (a) :FAUSE SO 

1540 [F Y=1:CSIZE 3,1: INK S:AT 4,20 
:FRINT CHRS (a) 

1550 IF Y=2:CSIZE 0,@:AT 18, 34:FRIN 

T CHR (a): FAUSE S@ 

156@ END DEFine 

1570 DEFine PROCedure icheck 

158@ AT 18,4: INK i:PRINT "Flease ty 

pe numbers 1 to 6." 

1590 Y=1:a=CODE (INKEY$(-1)) 

1400 REFeat loop 

161@ SELect ON a 

14620 =49: BEEF 5000,5:sprint:looka 
1620 =5@: BEEF 5@00,5:sprint:lookb 
1640 =51: BEEP 5000, 5: sprint: looke 
165@ =52: BEEP S5SO@@Q,S: sprint: lookd 
1460 =53: REEF 5O00,S:sprint: Looke 
1670 =54: BEEF 5000, S:sprint: Lookf 
1680 =REMAINDER :negsounds: icheck 
1690 END SELect 

1700 beurt: jumble 

171@ END DEFine 

1720 DEFine FROCedure negsound 

1730 BEEF 100,50 

1740 END DEFine 

175@ DEFine FPROCedure blowup 

1768 WINDOW 250,1900,13@,70 

1770 FOR a=1 TO 8@:SCROLL 4: SCROLL 
-4: BEEP 10000,RND(706 TO 10900) ,100, 
40,50,30,1,20:NEXT a 

1780 WINDOW 450, 220,25,15 

179@ END DEFine 

1800 DEFine PROCedure into 

1810 OFPEN#20, scr _5@x31a35x20 

1820 FOR x=1t TO 4:PAPER#2@, 2: SCROLL 
#20,»:NEXT x 

1820 FOR x=1 TO 4: FAPER#20, 6: SCROLL 
#20,x:NEXT x 

1840 FOR x=1 TO 4: FPAPER#20, 1: SCROLL 
#20,%:NEXT x 

1850 END DEFine 
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the copy of the spooler in 


CHR$(27) to the printer, ‘If’ to 


: 440 DATA *7002343CO1AAZ463CFFFF206E000443FA’ » 13973 
z - 45@ DATA *@51E4E434A8067G64BF AFFD461387097" » 14835 
rin er 00 er 469 DATA *3401363CFFFF206EQ0O843F ABSO24E43’ . 10517 
: j 47@ DATA *4A8@67@64BFAFFES61 104A1467BG46180" » 13644 
: 480 DATA *@11443FAQ45C34789O0D04E9261 000100’ , 12176 
I a f l 499 DATA * 709869000 1 A9OCVBBOF 657D4474A2854" . 11065 
5@® DATA * 6100008261800188347800D043FAG454’ , 12328 

an Jac son presents a useru 51@ DATA * 4E9270@E4E4370014E431E01700F4E43’ , 7968 

1° 520 DATA *0207@@DFOC®70043670AGCO7004146E2’ .8845 
small utility to allow the OL 530 DATA *S8SF40AA6 104584F 4EDS4 1888@B83478" , 12274 
t F t d t hil 542 DATA * @@D@43FAQ45A4E924E7561 9B908AS43FA’ . 14187 
: m 550 DATA *92503478@0D04E9243FAG474347800D0" . 13983 
fe 0 prin ocuments while 560 DATA ’ 4E923478O00D043FAQ1F44E92363C00C8’ . 14544 
: 578 DATA *613@60@0FER46170347800D043FAG1E4’ . 15656 
: carrying -out other tasks. S8O DATA *4E926190010A43FAQ1F44E9261900120" » 18062 
4 598 DATA * 7690600826003478@0CC4E92700572FF’ » 13918 
. . . : : 680 DATA * 4E4148E7CO0CO700893C972FF4E414CDF’ , 18587 
his multi-tasking The data in the install | 619 pata *@3034E754SE7F OF @613A39004444E344" 14511 
printer spooler hex program starts with the y- | 429 DATA ’47FA®20638334OFE67 1043F 340003478" , 11939 
loader program coordinate at the of the display cc. le econ. moicietiewdeg pang Aes, ant ane > ta 

- . x} ~ & ? , . 

is end se he ‘ype age hd — 4 sr 45@ DATA * 4E924@E@48E7FO402056701072FF74FF’ » 18936 
in and run. en, the spoo er en fo ows the preamble 660 DATA * 4E414AQ14660643F AGQDCE00443F ANODE’ , 14676 
can be started — for multi-- sequence, which is sent to the 679 DATA ”’ 7@@D72027 401 4E4370204E43701072FF’ » 12616 
tasking operation — using: printer before printing starts. | 68@ DATA *74FF4E414AQ16606701172024E434CDF’ - 11374 

The printer options which you | &7@ DATA *2@F4E752F087002206E00084E42201F” 6167 

, y . 70B DATA * 2FQ07002206E00044E42201F470@FD2C’ » 9167 
EXEC_.W mdv1_—spooler tee in the program are de- | 519 pata *61@@FF62701072FF74FF4E4140014704" , 12565 
: ined from then onwards, _ 728 DATA * 728A69827220205670054E43347820D0’ , 19598 

To switch the cursor be- Atthe end of each definition |73@ DATA * 43FA@13E4E927@@E4E4370014E430C01’ 7744 
tween Basic and the spooler, of the preamble or a printer |74@ DATA ’ @®E866F6700@5720A4E4346000FCEE48E7’ » 17034 
press CTL-—C option you should put ‘end’, as 738 DATA *F@50701072FF74FF4E414AG1670A2056’ . 11265 
he - |76®@ DATA *7005720A76FF4E434CDFOA@F4E757E97’ » 11564 
To customise the spooler for you should after all ig 3 ir 77@ DATA * 7C®20C@6O0866602702743F ABZCF 724" » 10577 
your printer, type-in the install ter options have been defined. | 7gq@ pata *12C6S1CSFFFC702643FAG2CO4E435446" , 15893 
program and alter it to suit © Within each definition list you | 798 DATA *@C®69®®@74DDCS1CFFFD84E75@1E40167’ , 15725 

your printer. Then run it and may use ‘esc’ to send | 88@ DATA * GBGAGG19920099OOCOO99OO09200001 6” » 548 

819 DATA * @999OS1EOOO3434F6ER0901520205072’ » 6861 


mdv1__will be altered. Tosave send CHRS(10), or you may | 839 para -2eesez2sezenezezeeser 7679726967", 18979 
the install program, type: put ‘”..’ to send the character | g4@ DATA °687420284329313938352049616E204A’ 8699 
.., Or justanumbertosendthat |85@ DATA *61636B736F6E@@2554797065207 46865" » 12213 
character number. 869 DATA * 2066696C656E616D46520206F 7220454E” , 19945 
878 DATA *54455220746F2073744F703A20000002" » 7514 
88@ DATA *222F80194279652066726F6D20707269" » 12206 
892 DATA *6E74657220537046F 6F4C65723B90001F’ , 9252 
90 DATA * 20707265737320636F6E74726F 602043" , 12533 
91@ DATA °20666F72206F7 468657 2204A6F422EQ0’ , 19289 
100 REMark hex loader for Printer Spooler 92@ DATA *@0GE492063616E27742066696E642022" » 10134 
110 : 930 DATA *@@16507265737320463120746F 20436F’ » 11912 
120 ad=respr(176@)! a=ad: h1$="@123456789ABCDEF’ : 94@ DATA * 6E74696E75652E208000000000002000" » 2866 
errflag=@: RESTORE 958 DATA *@92C808090420000005C090000000000" , 1404 
130 FOR i=1 TO 110 969 DATA * S229BOO9DBO4ADDEBD9qB09RRR000R00" , 636 
149 READ d$,check? sua=® 97@ DATA ’ @@88909C8O1 44 12040696E6520774173 » 11548 
15@ FOR j=1 TO 16: b=16*(d$(j¥#2-1) INSTR h1$)+(d%| 198 DATA °20746F6F206C6F6E672E0017546F6F 20" » 9992 
(j*2) INSTR hl$)-17! POKE a-bt a=a+1! sum=sum+j*b 992 DATA *6D616E792863686 16E6E656C73206F 70’ » 13272 
160 CLS#@: PRINT#@,i: IF sum<>check THEN PRINT °E 190@ DATA * 656E2100009C4669606520696E 207573’ » 19889 
in line *3;19@+10*i! errflag=1 1918 DATA *652E0@1C594F7572206F7074696F4E73’ » 13578 
1820 DATA *206172652053494042454446502E2020" . 8297 
1038 DATA *@@12496E707574286275664665722066" » 12444 
104@ DATA *75&éC6C2E@QOF5072696E74657220696E” » 12201 
: 185@ DATA °207573652E000020456E7 46572207468" , 11944 
DATA *£01@@3BAQO@O4AF BOOO7S3706F46F CES’ » 11967 1060 DATA *65207072696E746572206D46F 6465206F” , 12609 
DATA *7200584F 4DFA®65C700172FF41FAGS3B6’ , 15991 1878 DATA *7074696F6E733A282020202020202020’ » 6205 
DATA ° 4E424A806600024E2C887927720076FF’ - 12880 188@ DATA *20202020202020202020202020202020" . 4352 
DATA ° 4E43702872004E43702972074E436 102" , 8523 189@ DATA *202828202020202020201B401B520000’ . 4484 
DATA * 029443FAG39634789OD04E926 1889320" , 19246 118@ DATA *53010F20000000000000000049021834" , 2344 
DATA * 43FA®3AQ4E926 19003366 100827843FA’ 11506 1118 DATA *@8090880000000004C031B5701900009" , 2068 
DATA * 93B6347800D04E92610003047002343C’ ,8143 1128 DATA *9008000042021B4509000090000000R00" , 1983 
DATA *0029363CFFFF43FAQ6384E434A8067@C’ , 12525 1130 DATA * 45021B4D900000000000000044021847" , 2915 
DATA * OC@@OOFBE69270EB690002A6534146700" - 10614 114 DATA *0®00000000000000446061B46COF1B51417-5111 
DATA *@1C643FAG41A3261 7901 72FF746012049’ » 11694 115@ DATA ° 000000005006 1B43441B4E8500000000" . 2979 
DATA * 4E424080678COCOQOF 9670001 7E6000" . 8455 1168 DATA * e@veoVeB2BAZD00Re90R2000000000000" . 0 
DATA *@2802D48000441FAG54270014E424A80’ . 10525 1172 DATA * @2000000000000000000000473657231" »5451 
DATA * S7@COCOOOOF7669270EA6OB092542D48" , 9888 1188 DATA ° 001949206861 76652064696E69736865’ » 13067 
DATA *0@86190020043F A947E3478@@D84E92’ - 12512 1198 DATA *64207872696E74496E67 2E000004202D’ , 7575 
DATA * 6180028C700243F AG5C8343C80294E43’ . 9857 128@ DATA * 20200024205072657373204120746F 20’ » 19020 
DATA * 4A80470COCB@QOF B448270EB6OG00222’ , 9567 1210 DATA *61626F7274206F 722043207 46F 20636F" » 11397 
DATA °534143FA@5AA3281206E0088700743FA’ - 11884 1220 DATA * 6E746946E75652E200000000900000000" , 2966 
DATA *@468343C0029363CFFFF4E434A8@64600" » 12497 1230 DATA ’ aQeegaesaeedQRR80000000900000025" - 592 
DATA *@1F449FAQSSAZE1053476B38101C0200" 7155 1248 DATA * 205072696E74696E67202D2070726573’ » 12348 
DATA ° Q@QDF4BFA@44CBO1567 1 @DAFC@@@C4A2D" » 12244 125@ DATA *732045534320614E6420BE20746F 2061’ » 11592 
DATA *000166F270F 140000100 700774001420" .9847 1260 DATA *626F72742E000901 2000000001 020000’ , 1468 
DATA °@001363CFFFF43ED00024E434A884400" , 11540 1278 DATA * 20) 2QOSSRSR29" .o 
DATA °@1B460C4610000B449FAQ4FE51D47011" , 15580 1288 DATA * esesvesD0B2000NB00R0000R9RR0000000" . 0 
DATA *47FA@5344E410201900C8C81900C473E’ , 45465 1292 DATA °29990000000000000000000000000000’ » 2 


o> 


SAVE__ME 
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109 REMark Spooler install — Brother M10Q@9 
110 REMark REM’s may be omitted 

128 : 

130 DATA 0,30: 


14@ DATA *’esc’,’"@*.*esc’,’"R’.8,’1f"," end’: 
REMark preamble 

15@ DATA *S’*,15,"end’: 

REMark small 

160 DATA "I’,’esc”,”’"4"," end’: 

REMark italics 
170 DATA ’L’,’ esc’ 
REMark large 

180 DATA ”B’.*esc’,’"E*,’ end’? 
REMark bold 

19@ DATA 7E’,’esc’.""M’,’ end’: 
REMark elite 

200 DATA ’D’;’esc’>’"G*,’ end": 
REMark doublestrike 

210 DATA *F*,"’esc’»’"1’,15>’ esc’ 
REMark fifty chars across 

220 DATA ’P’,*esc’>’"C*,7@."esc"s*"N’.5;’ end’? 
REMark paged; perforation skip 

238 DATA * end’ 

240 : 


>’ "W',1,7end’: 


77 "@°,65,’ end”: 


@) 
268 LBYTES mdvl_spooler,ad 

278 adt=ad+2+PEEK_W(ad+2): ad f=adt+PEEK_W(adt>): 
l=adt+2+PEEK_W(ladt+2) 


TDORXVI Version 4 


Version 4 of THOR XVI is a completely redesigned hardware and 
software version of the well-known CST THOR XVI, now a 100% Danish 
production, Itis produced by one of the largest Scandinavian manufacturers 
of high quality measuring instruments vouching for the high standard of our 
product. 

The brand new version of ARGOS (6.40/'1.07) introduces a number of 
new facilities and a much improved full SCSI hard disc handling. ARGOS 
6.40 now supports the standard IBM AT keyboards, IBM AT extended and 
PS/2 extended keyboards, covering 11 different national languages. 

Now it is possible to use the advanced facilities of any printer, including 
laserprinters, thanks to new user defined extended translation tables. 

ARGOS windiwing facilities are extended to support separate screen 
MODE for each job. 

In addition to PSION Xchange we deliver free of charge 2 discs with 
easy to use menu system and ultlities. 

Present THOR XVI users please register with us in order to request a 
ROM’Software upgrade. Technical support is already available in the U.K. 
through P.M. Engineering. 

Please request the new 12 pages THOR XVI brochure and price list 
containing also a description of the new coming products. We are pleased to 
announce 2 new products: 

* ARCTURUS EDITOR (Arced), the indispensable companion for 
programmers (also running on THOR 8 and Sinclair QL), introductory price: 
GBP £45.00. Please request a technical description. 

* C++ COMPILER for the THOR and QL range of products, is under 
development. 


Dansoft offers software service contracts for existing THOR customers 


DANSOFT 


Sole Agent for: 


THOR INTERNATIONAL COMPUTER SYSTEMS I/S 
Raadhusatraede 4 b, 4.sal, DK 1466 Copenhagen K 
Mail to: P.O. Box 59, DK 1002 Copenhagen K, Denmark. 
Phone no: +45 1 930305 (after May 15th: +45 33930305) 
Fax no: +45 1 938292 (after May 15th: +45 33 938292) 


52 


PRINTER SPOOLER 


REMark top of window y-coordinates for mode 4, 8 


250 DIM cdX%(9)t RESTORE : READ y4,y8: ad=RESPR(200 


280 POKE_W adt+4+PEEK_Wladt+4),y4: POKE_W adt+4+PE 
EK_W(adt+é6),y8 

290 FOR i=@ TO 9: rdvi cdX(id=ve IF v=~i8 EXIT i 
30@ j=i-(v=-1)! FOR i=@ TO 8-j: POKE adf-10+i,32 
318 FOR i=9-j TO 9: POKE adf-10+i.cd%(i-9+j) 

328 FOR y=8 TO 9 

33@ 4 adh=adf+y*i2! READ i$: v=CODE(i#*) 

348 IF i%=’end’ THEN v=~1: EXIT y 
35@ POKE adh»vt POKE adl+y,v: FOR 
IF v=-1: EXIT it ELSE POKE adht+i+2,v 
360 POKE adht1,i+(v<>-1) 

370 END FOR y 

388 i=yt+(v<>-1)! POKE adl+i.46: POKE adf+i*12,0 
398 FOR j=i+1 TO 9: POKE adl+j,32 

40@ DELETE mdvi_spooler: SEXEC mdvi_spooler,ad,175 
6,536 

410: 

420 DEFine PROCedure rdv 

43@ READ i¢ 

440 IF i#(1)=""*" THEN v=CODE(i$(2)): RETurn 

45@ IF i%=’end’ THEN v=-1? RETurn 

460 IF if=’1f’ THEN v=1@: RETurn 

470 IF i$=’esc’ THEN v=27: RETurn 

488 v=i$: RETurn 

490 END DEF ine 

S@@ : 

SiQ@ DEFine PROCedure save_me 

520 DELETE mdvi_ spoolinstl: SAVE mdv1_spoolinstl 
S3@ DELETE mdv2_spoolinstl: SAVE mdv2_spoolinstl 
540 END DEFine 


=@ TO 9: rdv: 


* Simclisire ve 


EEC LTD SUPPLIES OF Sinclair QL COMPUTERS 
QLs FROM £65, NEW PRICE LIST 


BACKUP QL JM ROM. The QL only. Assembled & tested not S/H keep it as 
insurance, or for networking. Cheaper than changing to another system...... £65 
BACKUP QL JS ROM. As above... sas —_ 2:1] 
QLs COMPLETE. Fully tented ated with 3 eeihe: wartanty., 
QL JM ROM. TV lead. QL Software 2.35, also complete bound user guide for 
QL, Superbasic, & The Software; Quill-Word Processor, Abacus-Spread Sheet, 
Archive — for records, Easel-business graphics. £120 
QL JS ROM. As above. ..........ccccccceesseseesesseiesene we B13. 


SPARES & ACCESSORIES When Available. 
QL Software 2.35 ............... .£15 (or Upgrade. Send Pack/Disk, S.A.E. & £5.) 
Complete bound user guide QL power supply unit... wae ROO 
Microdrive units .. - JM Roms... 1 
dialed P/C Boards is JM.. Joysticks... 
QLICs... 


LOW COST PRINTERS. Complete with installation, instructions for Quill, 
Abacus & Archive. 

SEIKOSHA GP100A. Centronics. 80 Col, 50 cps, Graphics. Tractor feed. 
Especially suitable as a second printer for listing, & printouts. ... .. £80 
SEIKOSHA GP5SS50A. Centronics. 80 Col, 50 cps, NLQ 25 cps. 139 Characters. 
Graphics. Built-in friction/tractor feed. Prints-underline, italic, expanded, 
condensed, elite, NLQ, proportional, sub & superscript. ..0...0-.04.cccccereeereseee £120 


QL SOFTWARE CLEARANCE 
Intergrated Accounts. Cash Trader. Decision Maker. Home Finance. 
Entrepreneur. Macro Assembler. Toolkit, ....:.0r:sssssessscssssecssecessoeseees ve £18 


Touch & Go (Typing Tutor), Gardener. QL Paint. Reversi. QL Games 


neh cases ssa vcr canines cannon casnannendeamasaneaionesdan caitumsma vurevavdvabvanvulee £9 
EN Fax No: 0753 887149 
EEC LTD 


18-21 Misbourne House, Chiltern Hill, Chalfont St Peter, 
Bucks, SL9 9UE. Tel: 0753 888866. 


TERMS CWO, ACCESS or VISA. 
Minimum order £9. P&P £6.00 for printers & QL, 
other items £3.00. Overseas Enquire. 
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REMark *¥*¥ PROGRAM IS COMPLETELY beliatal 
REMark **¥* ONLY RESET/BREAK WILL STOP IT *** 
AT 5,INT((28-LEN(title$})/2):PRINT title$:PAUSE 90 
CLS 
IF title$=“Multiplication Tables” THEN 
AT 3,4:PRINT “What is your name?” 
AT 5,4:INPUT name$ 
AT 7,4:PRINT ‘“"Hello, 
AT 8,4:PRINT name$;‘!”~’:PAUSE 100 
END IF 
IF test=l THEN 
INK 2:AT 0,1:PRINT’ Press <ENTER> if your name is not 
AT 1,INT((37-LEN(name$))/2):PRINT name$:INK 1 
END IF 
REMark *#* Raspberry! :See line 3370 *** 
IF minutes<0 THEN minttes=minutes+60 
ime_elapsed=60*minutes+ end_time$(4 TO 5)-time now$(4 TO 5) 
"Ss 
,cle=0 
F new tables list(0)=1 THEN 
LET round$=" round” 
ELSE 
LET round$=" rounds” 
END IF 
IF new tables list(0)>1 THEN 
intro “There will be “anew tables list(0)seround$ 
END IF ~ ~ 
IF new tables list(0)>1 THEN intro “Round “éround 
PAPER 6:INK 0 
IF minutes<0 THEN minutes=minutes+60 
time elapsed=60*minutes+ end time$(4 TO 5)- time now$(4 TO 5) 
PRINT ~ a 
LET cycle=cycle+l 
IF cycle>1 OR round>1l THEN 
CLS 
AT 5,4:PRINT “You got “j;correct total; out of 
LET average time taken=INT(total time/(cycle*round)+.5) 
AT 9,4:PRINT “You took 
INK 2:FLASH 1 
IF average time_taken>60 THEN 


AT 11,4:PRINT “Good try ~;name$;”!*:PAUSE 150 
AT 11,4:PRINT “Why not have another go?” 

ELSE 

AT 11,4:PRINT “Well done “*;name$;~*!~* 

END IF 

PAUSE 150:INK 0:FLASH 0 

END IF 


IF level$(1) INSTR “TQ” THEN 

INK 2:AT 13,2: PRINT “Press <ENTER> if your name is not” 
AT 14, INT( (40-LEN(name$))}/2):PRINT name$:INK 0 

END IF 

AT 16,4:PRINT “Press R to Repeat~ 

AT 17,4:PRINT “Press M to obtain Menu” 

AT 18,4:PRINT “Press ~;change$(1);”~ to move on to a 
AT 19,4: INPUT “Which?”; option$ 

IF option$="" AND level$(1) INSTR “TQ” THEN RUN 


“;change$ 


CLEAR 

MODE 8:CSIZE 1,1:PAPER 2:INK 7:CLS 

AT 2,INT((28-LEN(”LOADING”®))/2):PRINT “LOADING” 
AT 4,INT((28-LEN(” “Multiplication Tables’”))/2): 


PRINT *~ ‘Multiplication Tables’” 
PAUSE 200:CSIZE 0,0:PAPER 1:INK 6:CLS 
LRUN mdvl_Multiplication_tables 


“;cycle*round*10;”* 


“;average time_taken;” seconds per round.” 


I was pleased to see my Multi- 
plication Tables program in the 
February issue. There is a 
revised version which removes 
a few screen blinks and imple- 
ments the multi-user option, | 
have also cured the negative 
time-clapsed bug which arises 
when readings of Date$ 
straddle an hour. 

If readers type-in the follow- 
ing listing and merge it with 
that published in the February 
issue they will have the up- 
dated version. Also, deleting 
the Mode 8: from line 610 and 
replacing the text+line para- 
meter of 18 for the rub__out 
procedure by 19-INT((LEN 
(option$)+ 10)/37) in lines 4680 
and 4710 will remove a few 
more blinks and tidy the screen 
when the user fills the 
keyboard buffer. 

Ron Allpress, 
Thwaite, 
Suffolk. 


correct. 
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EQ any U B* 
HMERICAS — Oe 0388-450610, Fax: 0388-609845, 


Prestel MBX: 219998590, oO) 
Telex: 934999 TXLINK G (Quoting Reference No. 219998590) ee 


0388 450610 THE QLS 0388 450610 
REVOLUTION ~~ 


ALLIANCE 


-2 | =HAS ARRIVED!” ~ 3; 
qm “QLSUB!, THORNADO, LCF, AND MORE~ Ser 
> ALLIANCE OF QL USER GROUPS! 

XO 


MME KR SERVE 


NAME: A, SAMPLE 
; SUBSCRIPTION No: MO@4¢O@769QL 


TEL: 0388-450610, FAX: 0388-609845 
TELEX: 934999 TXLINK G, REF: 219998590 
PRESTEL MBX: 219998590 


PO BOX 3, SHILDON, DL4 2h) 


~ SUBSCRIPTION OFFER! 


. cme What do we offer? Who can benefit? 


A light at the end of the tunnel.. All sorts of people read 
A full-time telephone help-line is in all sorts of place 

backed up by written support, and Guineau, Iran AND Ira j i 
HERINTY AON a wide range of special services United States, India, “France, Oman, 
developed only for our readers. Zimbabwe, Libya, Greece, Poland... 


me Se (we hope) monthly intervals. £ (UK ONLY) 
al areusee he pe and informed ‘vice. Lae RATE 
Richewed Caine STARTS £20 
“a £20 Europe, £25 World. 
Richard J, turner, OFFER EXTENDED TO Ist AUG. 


PHONE USNOW _ Auckland Business Centre, St. Helen's Auckland, FRIENDLY ADVICE 
FOR BEST PRICES BISHOP AUCKLAND, Co. Durham, ENGLAND, DL14 9TX. ON COMPUTERS 


PO Box 3, Shildon, DL4 2LW 


Please Note- We use PO os 3 for convenience. a you would prefer to 
write to, or order from our business premises direct you are welcome _ to 
do so. of course, you can call too, but please arrange a time to call. 


WE WELCOME CALLERS BY APPOINTMENT ONLY! 


BojeyeD Pue suize 


Running Every Day. All Day. Direct Dial! 


"uoneBIIGO ON “UO!H}eUIIOJU] 404 
‘QL Bulletin Board always on =~ 


jjsonbey uo on 


